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rack para microcomputador 


- Projetado especificamente para microcomputadores 
de uso pessoal ou comercial 

- Duto eletrificado com tomadas, filtro e circuitos de 
segurança 


- Gaveteiro-arquivo dimensionado para diskettes e | | 
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- Dimensões: | 
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- Acabamento em madeira natural, laminado ou INFORMATICA 
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Editorial 


A economia brasileira se assemelha a 
uma escada rolante que está descendo. Se 
você nela ficar parado, fatalmente acabará 
descendo junto. O setor ligado à informáti- 
ca, porém está percorrendo esta escada em 
sentido contrário e consegue galgar seus de- 
graus tão rapidamente que está subindo 
apesar da crise e da recessão. 

Neste mês de outubro realiza-se a || Fei- 
ra Internacional da Informática no Parque 
Anhembi em São Paulo. O volume de expo- 
sitores e participantes mostra bem a impor- 
tância deste setor da economia brasileira. 

Deve-se destacar, entretanto que esta 
pujança não é devida aos grandes sistemas, 
área dominada pelos “experts” e pelos 
pomposos e retumbantes executivos das 
centrais de processamento de dados. Ela se 
deve mais ao pequeno empresário ou pro- 
fissional que se utiliza de um mini ou mi- 
crocomputador: se deve a você, usuário, 
que tem uma pequena (e barata!) maravi- 
lha dentro de casa. Você deve se orgulhar 
disto! 

Todo este otimismo, porém deve gerar 
duas cautelas: em primeiro lugar devemos 
lutar com todas as forças para que esta in- 
dústria brasileira continue brasileiral Em 
segundo lugar devemos nos acautelar con- 
tra Os picaretas atraídos pelo lucro fácil e 
pelo modismo do mercado. Para isso a nos- 
sa revista continuará informando, analisan- 
do e principalmente ensinando ao usuário 
como tirar o máximo proveito de seu pe- 
queno grande computador. Como exemplo 
disto, estamos publicando neste número a 
primeira parte de um importante artigo so- 
bre direitos autorais de software. Afinal, 
muitos de nossos leitores são “pronsumido- 
res”, ou seja, consumidores que também 
produzem em nível artesanal ou até profis- 
sional, e esta é uma atividade que pode e 
deve ser protegida contra piratas e tuba- 
rões! 
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CARTAS DOS 
LEITORES 


Gostaria de parabenizá-los pela excelente idéia de 
conglomerar os usuários do TK82C em torno de uma 
publicação. 

Aproveito a oportunidade para solicitar o número ze- 
ro da Microhobby e assim poder completar a coleção, 
desde o início. A forma de pagamento deverá ser infor- 
mada pelos senhores, para que eu possa receber o núme- 
ro zero. 

Uma vez que a revista tem grande penetração, gostaria 
de solicitar-lhes, se possível, a publicação ou o envio pa- 
ra mim, do esquema eletrônico do TK-82C, pois tenho 
vontade de conhecê-lo mais a fundo tanto em hardware 
quanto em software e passar assim, a desenvolver alguns 
usos diferentes para o micro, principalmente na área de 
controle. 

Contando com a sua compreensão, agradeço a aten- 
ção dispensada. 

Luis Henrique P. Fonseca — Salvador, BA. 


Caro Luiz Henrique, 

Infelizmente o número Zero de nossa revista está es- 
gotado.Como paliativo, porém, você pode tentar obter, 
de algum amigo, uma cópia “Xerox” dela. Em último 
caso, escreva-nos novamente e nós lhe mandaremos uma 
“xerox” da mesma. O 


Faz pouco mais de três meses, procurei comprar uma 
máquina de jogos-xadrez e não achei no mercado. Numa 
das lojas que visitei, me ofereceram um TK-82, dizendo 
que “também jogava xadrez”. O preço do mesmo era 
razoável e eu o comprei. 

Depois de constatar que realmente o computador jo- 
gava xadrez, comecei a pensar: “uma máquina capaz de 
fazer aquilo, deveria ser capaz, também de fazer virtual- 
mente qualquer coisa”. Passei a estudar o manual, que a 
princípio me pareceu escrito em grego, interessando-me 
cada vez mais pelo computador. Aos poucos, fui me sen- 
tindo capaz de desenvolver um programinha, para con- 
trole de nosso orçamento doméstico — e não é que deu 
certo?! 

Logo descobri, porém, que a capacidade da máquina 
não é ilimitada. Não é coisa muito difícil botar, na me- 
mória, um programa. Isto fez aumentar minha admira- 
ção pelo programa de xadrez. E também minha curiosi- 
dade. Quis saber mais a respeito daquela pequena mara- 
vilha. E minha curiosidade levou-me a ler, com mais 
atenção, a revista número Zero da Microhobby. Gostei 
tanto da revista que resolvi fazer a sua assinatura. Os 
dois primeiros números confirmaram a minha expecta- 
tiva. À medida que vou adquirindo novos conhecimen- 
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tos, vejo expandir-se o horizonte das possibilidades que 
a computação oferece. 

Enfim: “descobri uma nova atividade extraordinaria- 
mente interessante, que tem, a meu ver, um único defei- 
to: não me deixa mais tempo para o xadrez”. 

Junto com o número 2, recebi a fita brinde, que por 
algum erro involuntário, de sua parte, veio sem o progra- 
ma “Simulador de Vôo”. Estou remetendo-o para, se 
possível, trocá-la. E, se for possível escolher, eu prefiro 
que me enviem o apagador de fitas. Aproveitando o lado 
2 da fita, que estava “vazio”, gravei nele, uma possível 
solução do quebra-cabeça “Verdadeiro ou Falso”, que 
deve ser carregado com LOAD “W/F”. Mesmo que não 
seja escolhido para publicação, gostaria que fosse co- 
mentado por alguém que realmente saiba programação, 
para poder corrigir-me e para que eu possa aprender. 

Estou enviando, também, uma fita do “TK-MAN” 
que não quer entrar. Gostaria de saber se é defeito de 
meu gravador ou da fita. 

E tenho ainda mais uma pergunta: 

1. O manual diz que PAUSE deve ser seguida de 
POKE 16437,255; mas nos programas publicados na Re- 
vista, POKE está antes de PAUSE. É o mesmo? 

2. Se eu entendi direito, no programa de Alta Resolu- 
ção (nº 2) há uma linha REM que fornece instruções em 
linguagem de máquina. As linhas REM não são, então 
ignoradas? Existe o risco de, ao se utilizar em REM (que 
pode ser “enfeitado” com alguns caracteres gráficos) 
estas linhas fornecerem alguma instrução não desejada? 

Grato pela atenção que vocês me dispensarem e até a 
próxima! 

Alejandro Luis Cobos — São Paulo, Capital. 


Prezado Alejandro, 

Grande parte de sua estória é comum a muitos usuá- 
rios do TK (entre os quais nós nos incluímos). Com rela- 
ção às fitas, informamo-lhe que a do “Simulador de 
Vôo” foi substituída por outra testada e já foi providen- 
ciado o seu envio para você. 

A fita do “TK-MAN” foi remetida à MICROSOFT pa- 
ra ser testada. Oportunamente você receberá notícias 
dela. 

Sua solução do Quebra-Cabeça ainda está sendo estu- 
dada por nossos programadores. 

A seguir, damos a resposta de sua primeira pergunta. 
A resposta da sua segunda pergunta, foi transferida para 
a seção “DESGRILANDO”. 

1. A linha POKE 16437,255 após uma PAUSE, só é ne- 
cessária nas máquinas mais antigas (devido a seu peque- 
no inconveniente na ROM). As máquinas mais novas dis- 
pensam-na. O 











Prezados Senhores, 

Antes de mais nada, meus parabéns pela excelente re- 
vista; informo-lhes que a “Microhobby” é a revista que 
sempre quis ter em mãos, agora não falta mais nada. 

O que quero saber é o seguinte: “A questão de uns 
quatro meses, adquiri, pela Microdigital, a fita com os 
programas “Demolidor e Marciano”. E sem pre as usei 
sem problemas. 

Só que de uns dias para cá, o programa “Marciano” 
não entra no Micro após o LOAD. Ao invés de acabar 
com (5/Q ele acaba com o cursor L. 

Eu fiz exatamente o que os itens 1 e 2 falavam na res- 
posta para o Sérgio no número anterior, mas não obtive 
resultado. Logo, eu pergunto: “Seu eu enviar para a 
Microdigital — explicando o problema, eles eventual- 
mente me mandam outra fita?”. 

E por último, o TK-82€ não possue a função “DEF 
FNR(x)” — o que devo fazer?”. 

Atenciosamente, 

Amauri P. Lúcio — Taubaté, SP. 


Caro Amauri, 

Cremos que a gravação em fita tenha sido danificada 
acidentalmente por você (talvez por deixá-la próxima a 
televisores ou transformadores e outros aparelhos do ti- 
po). Neste caso infelizmente, a fita não lhe será substi- 
tuída. De qualquer modo, esperando que estejamos er- 
rados, vale a pena você tentar enviá-la para verificação. 
Com relação a garantia das fitas comercializadas, comen- 
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fd 


tamos a respeito, sobre uma inovação introduzida pela 
Multisoft na seção Fita do Mês. 

Você pergunta ainda, como traduzir para o BASIC 
TK, a instrução DEF FNR (x). A seguir, publicamos, pa- 
ra você, uma possível solução: 

Suponha que as linhas a serem traduzidas sejam as se- 
guintes: 

1000 DEF FNR(x) = LN (INT(x + LNx)) 
1500 LET K = FNR (16) 


Procedemos a tradução seguindo os três passos 
adiante: 
1. Colocamos o segundo membro da igualdade da linha 
1000 numa STRING. 


1000 LET F$ = “LN (INT (X + LN (x)))” 


2. Atribuímos à variável X o valor 1, que é o argumen- 
to da função FNR na linha 1500. 


1499 LET X = 10 


3. Atribuímos à variável K, o valor (VAL) da STRING 
FS. 


1500 LET K = VAL (FS) 


Outras soluções podem ser utilizadas. Como exerci- 
cio, tente “bolar” uma. O 
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O QUE FOI A FEIRA DA INFORMÁTICA E O 
CONGRESSO? — Como esteve a Microhobby. 


PROGRAMAS DO LEITOR: 

Jogos Inteligentes ou Inteligência Artificial 

A melhor maneira de escrever programas de jogos 

inteligentes em BASIC. 

Solução de Equação Algébricas e Transcedentes — 
Através do método “de Bolzano ou de Bissecção”. 


PROGRAMAS DO MES: 
Burgo — O programa destaque na edição nº 6. 


MUITAS DICAS E INFORMAÇÕES 


PEQUENOS ANÚNCIOS — Envie seu pequeno anúncio 
para ser publicado gratuitamente. 


POR DENTRO DO APPLE: 
Velocidade e Economia 
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DESGRILANDO 


6 Trecho da Carta de nosso leitor Alejandro Luis Cobos, publi- 
cada na seção CARTAS DE NOSSOS LEITORES, neste número: 

. Se eu entendi direito, no programa de Alta Resolu- 
ção (nP 2) há uma linha REM que fornece instruções em 
linguagem de máquina. As linhas REM não são, então 
ignoradas? Existe o risco de, ao se utilizar um REM (que 
pode ser “enfeitado” com algum caractere gráfico), estas 
fornecerem alguma instrução não desejada? 


Aqui está a sua resposta Alejandro: 


As linhas REM são ignoradas pelo micro, quando ele 
as lê em BASIC (dessa forma, não há perigo em “enfeitá- 
las” com caracteres gráficos). Note que é justamente o 
fato de serem ignoradas, que as tornam boas lugares pa- 
ra guardarmos programas em linguagens de máquina. 
Tais programas só serão lidos pelo TK se o instruirmos 
devidamente, através da função USR. 

Para compreender melhor o que dissemos acima, digi- 
te o programa listado a seguir, tendo o máximo cuidado 
para não errar ao digitar os caracteres após o REM da /i- 
nha 1. Para não haver dúvidas, consulte a TABELA 1, 
onde eles estão mostrados em sequência. 


REM ELRNDTE-:S? RETURN 7208 
EN Ro 7sé POKE 1 LIST TBN 
3 POKE Jesas são Fioura 1 
IQura 
4MPOKkE 16529,1419 9 


Ao introduzir os caracteres RETURN, POKE e LIST 
proceda digitando antes SHIFT THEN e depois apague 


os THEN's, movendo o cursor para trás usando, para is- 
so, RUBOUT. 


ORDEM QBSERUACBO CARRCTERE 
1 LETRA E E 
z (SHIFT SPSCEl = 
3 FUNC. RBND? RNO 
4 NUMESO 7 7 
s tERSPHRHIOS 494 = 
a tSHIFT o dl — 
tSHIFT Z: : 
& NUMERO & & 
q (SHIFT TC: ? 
18 ( THEN RETURN + RETURN 
11 (SHIFT OC z 
12 LETRA CC E 
1& TtCERBF . SHIFT 7º = 
14 (FUNCT TON &º Lt EM 
is tenar. aPocE: E 
16 (SHIFT EC: 2 
17 NUMERO 7 Rd 
18 (SHIFT tt Era 
19 NUMERO 4 £ 
2a ti THEN POKE 1 POKE 
e1 (SHIFT JIJ q 
22 (€ THEN LIST > tÍIST 
2a FUNCTION E? TAH 
Figura 2 
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ATENÇÃO: Em hipótese alguma traga a linha 1 REM 
para baixo com o comando EDIT. Caso você já tenha 
feito isso, digite NEW e comece novamente. 

Após haver introduzido a linha 4, digite RUN e NEW 
LINE. Quando o 0/4 surgir na tela, digite LIST e NEW 
LINE. 4 /inha 1 REM... deve modificar-se ligeiramente 
e a listagem deve ser a seguinte: 


1 REM ELRND7F-.SH77$44 PORE « 
LIST TAN 

2 POKE 15522,1325 

3 POKE 15524,115 

à POKE 16525,119 Figura 3 
Se tudo correu bem até aqui, complete o programa 


como mostrado adiante e ponha-o para rodar: 


1 REM EfRND7F-: SH” 745 POKE « 
LIST TAN 
2 POKE 16522,126 
3 POKE 15524 ,1185 
é POKE 155298,119 
FOR I=8 TO 255 
PRINT CHR$ IT; 
NEXT T 
FOR J=8 TD 46 
LET PES or =USR 15514 
FOR K=8 TO 
NEXT K 
NEXT 
PRINT AT 298,14 ;“FIM” Figura 4 


Observe atentamente O que ocorre na tela. Você digi- 
tou RUN e NEW LINE e o micro começou a ler o pro- 
grama linha por linha, em BASIC. Vamos analisar como 
ele lê cada uma delas! 


TABELA Il 


AÇÃO DO TK 


IGNORA 
Coloca o número 126 no byte 16522 

Coloca o número 118 no byte 16524 

Coloca o número 119 no byte 16529 

Imprime o conjunto de caracteres do TK através de 

um “Looping FOR-NEXT” 

Inicia em “Looping FOR-NEXT” de 41 voltas. 

Ele lê essa linha normalmente até encontrar a função 
USR, cujo argumento é o número 16514. Quando a 
encontra, pára de ler o programa em BASIC e começa 
a lêio em LINGUAGEM de MÁQUINA, a partir do 
byte 16514. Acontece que, juntamente nesse byte, en- 
contra-se o código do primeiro caracter após o REM 
da linha 1 (código do caracter E = 42). Prossegue 
lendo os bytes sucessivos (16515, 16516, etc.) em lin- 
guagem de máquina, até encontrar, em um deles, o có- 
digo 201 correspondente ao caracter TAN. Após lê-lo, 
o micro passa novamente a operar em BASIC, lendo a 
linha seguinte âquela em que encontrou a função USAR 
(linha 60). O caracter TAN lido em linguagem de má- 
quina, faz o computador voltar ao BASIC. 

Essa rotina em linguagem de máquina, é a responsável 
pela inversão nos caracteres na tela. 

Fecha o “Loop 
Apresenta Etr IM 


da tela. 








Adiante, você pode observar os aspectos da tela após 
a linha 30 e 70 serem lidas. 


AA Eg.TE sec=+-=s:..S125 


456 759ABCDEFGHIJKLMNOPORSTINASKYE LT 
RNDINKEY $&PIZT22297227CTRRETERTTET 
ES tda? met TRE TCSOULE 
N COS TAN ASN AACS ATN LM EXDO INT 
SOR SGN RES PEER DSR STR$ CRBsS 
NOT xx OR AND «c=>=<> THEN TO STE 
P LPRINT LL IST STOP SLOU FEST NE 
) SCROLL CONT DIM REM FOR SSTO GS 
OSUB INPUT LORE LIST LET PRUSE mw 


EXT POKE PRINT PLOT RUN SRUE pari 
D IF CLS UNPLOT CLEGR RETURN COP 
o 


Figura 5 
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O mais recente lançamento da MULTISOFT para o 
seu TK (TK82, TK83 e TK85). 

Emocionante aventura onde você conduzirá o 

sapo desde o ponto de partida, até uma casa vazia. 

Você deverá cruzar a auto-estrada, sem ser 
atropelado e, em seguida, atravessar um caudaloso 
rio pulando sobre tartarugas e troncos que passam flutuando. 

Para adquiri-lo e entrar para a galeria de recordes do 
pulo do sapo basta enviar carta com seu nome e 
endereços completos, anexando cheque de Cr$ 

5.690,00, nominal à MULTISOFT INFORMÁTICA LTDA. - 

Cxa. Postal 54.121 - CEP 01296 - São Paulo - SP 


DO 
(FICA 


ptA 


Ç ca E MED! 
enTRESE 





INFORMÁTICA LTDA. 








e Tento participar desta revista expondo algumas dúvi- 
das que tenho. Trata-se da subrotina da ROM do 
TK-82C, a qual é chamada pela instrução FF (RST 38). 
Meu TK mostra a seguinte sequência de instruções a par- 
tir do endereco 0038H: 


0DC24500E1 05C8CBD9ED4FFBE9D1C8B18FB... 


Após decrementar “C”, a rotina salta para o endereço 
0045 somente se a condição for “Não Zero”. Então, que 
sentido tem a instrução do endereço 0046H (C8-Ret Z) 
após a instrução D1 (POP DE) se, de acordo com vários 
autores, a instrução “POD DE” não altera flags? Haverá 
talvez alguma outra parte da ROM que “chame” ou que 
se “desvie” para o endereco 0045H? 

Outra coisa: — a instrução D1 nesta rotina tem outra 
função que não a de simplesmente retirar (eliminando) 
o endereço do topo da pilha (stack)? 

E possível explicar, mesmo que resumidamente, o 
funcionamento do registro “R'' nesta rotina? E como 
ocorre o chamamento automático desta sub-rotina du- 
rante o processamento do display? 

Ainda sobre a ROM do TK, na rotina referente a gra- 
vação de programas encontramos as seguintes instruções 
a partir do endereço 0352H: 


DB FE — IN A, (FE) 


D3 FF — OUT (FF),A 





Que efeito tem a instrução OUT logo após a instrução 
IN, no caso acima? E a porta FE, refere-se ao teclado? 
Quais as portas de entrada e de saída no TK? 

JOSE BISIOLI SOBRINHO — São Paulo, SP. 


Prezado José, 

A instrução POP DE não altera as flags, e nem deve! 
O RET Z baseia-se no resultado das flags geradas por ins- 
truções anteriores ao POP DE. Geralmente, as únicas ins- 
truções que afetam as flags convenientemente são as ins- 
truções aritméticas e as lógicas (além, é claro, da instru- 
ção CP). Com relação às outras dúvidas, por exigirem 
respostas razoavelmente extensas, sugerimos a leitura 
dos livros “Introdução à Linguagem de Máquina para o 
TK” — ASSEMBLY Z80 — Vol. 1 e !l — Flavio Rossini 
(Editora Moderna e Micromega). O volume | está sendo 
lançado (na Feira da Informática) e o volume Il ainda 
não tem data prevista de lançamento. 

Infelizmente a maior parte das respostas às suas per- 
guntas encontra-se no volume Íf. 


Õ 
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Para simular o efeito de um caleidoscópio na tela do 
TK, utilizem-se da região central da tela (24 x 24 posi- 
ções) dividindo-a em quatro partes. Numa das partes se- 
rá gerado, conforme vocês poderão observar, em posição 
aleatória, um grupo de quatro caracteres iguais (também 
escolhidos aleatoriamente), os quais devem aparecer 
imediatamente e simetricamente nas outras três partes. 
Devido à velocidade requerida, utilizemos então, uma 
subrotina em ASSEMBLY — que será chamada pelo pro- 
grama em BASIC — para colocarmos os caracteres na 
tela. 

Comecemos pela subrotina em ASSEMBLY. Ela utili- 
zará dois números gerados pelo BASIC para calcular, a 
partir do DFILE — posição inicial da tela de TV na me- 
mória — onde colocar um caractere aleatório no primei- 
ro quarto da tela. Este caractere será repetido por 4 ve- 
zes, em posições adjacentes e, a seguir, o mesmo grupo 
será copiado simetricamente nos outros três quartos da 
tela. Note que, ao tratar a tela de TV em linguagem de 
máquina, não existem /inhas e colunas, mas sim posições 
de memória. Por isso, não estranhe os números gerados 
pelo BASIC. 

Vamos então apresentar a subrotina seguida por um 
programa em BASIC, o qual permite colocá-la no com- 
putador: 


MEMÓRIA MNEMÔNICO CÓDIGO 
16514 — (0) 

16515 - oo 

16516 - oo 

16517 - oo 

16518 LDE,S “EGO 
16520 LD HL, (D-FILE) 'ZAdcaa 
16523 LD BC, (16514) "ED4B 82 46' 
16527 ADD HL, BC 09" 

16528 LD BC, (16516) "ED4B844G' 
16532 SBC HL, BC “ED42' 
16534 CALL TV4 'CDC94G! 
16537 LD BC, (16516) 'ED4B8446' 
16541 ADD HL, BC oo" 

16542 ADD HL, BC oo" 

16543 CALL TV4 'CDC9 46" 
16546 LD HL, 758 '21F602' 
16549 LD BC, (16514) 'ED4B8246' 
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Flavio Rossini 


16553 SBC HL, BC 'ED42' 
16555 LD (16514), HL '228240' 
16558 LD HL, (D-FILE) “ZADC4O' 
16561 LD BC, (16514) 'ED4B8246' 
16565 ADD HL, BC "09" 

16566 LD BC, (16516) 'ED4B8446' 
165706 SBC HL, BC 'ED42' 
16572 CALL TV4 'CDC94H' 
16575 LD BC, (16516) 'ED4B8446' 
16579 ADD HL, BC 09" 

16580 ADD HL, BC "09" 

16581 CALL TV4 'CDC940' 
16584 RET Co" 

** SUBROTINA TV4 ** 

16585 PUSH HL "ES" 

16586 LD (HL), E 73 

16587 INC HL '23' 

16588 LD (HL), E 73 

16589 LD BC, 32 '01 2000' 
16592 ADD HL, BC 09" 

16593 LD (HL), E 73 

16594 INC HL 23 

16595 LD (HL), E 73 

16596 POP HL ET 

16597 RET 'C9' 


0BS.: Na memória 16519, $ representa o caractere que 
será enviado pelo BASIC. As coordenadas calculadas pe- 
lo BASIC, são colocadas nas memórias de 16514 até 
16517. 

Este programa tem 84 bytes (se incluirmos os dados) 
e será colocado dentro de uma instrução REM, que deve 
estar obrigatoriamente na linha 1. Assim, comecem a re- 
servar pelo menos 84 bytes de memória na linha REM: 


1MREM SEBGRAVASSSPFrcsperçDas 
Gaceragaregasgeogcergegagagaggaçsaga 
oredcagageacagegasgsaggagagasa 


(84 ou mais caracteres quaisquer) Figura 2 


Feito isto, apresentaremos um pequeno programa que 
lhes possibilitarão colocar a subrotina em ASSEMBLY, 
dentro do REM: 





p= o RUSSO 









1 REM 9009999999 69s9202co2308 EM AR E ECRND SOSUB PRhEND 
20990089990929095999989699696999390 o cósUs ND sOSUB PILN TON ARNO 
2200000909 090090608009996090099606 SeSUs 

S LET J=16514 SOSUB 

| 18 LET 9$&= JOSZUE 7 

| *S IF Ag="" THEN INPUT as ILN TAN RN 

| 28 IF Ag="P“ THEN STOP PNDTRN FAST 279 

| 25 LET X=164CODE AE+CODE Ag(iB) 

| -476 S 

380 POKE J.X ia 
3s SCROLL + 
40 PRINT “MEM. “;J;" “:;REL TO ee 
es” : X es *INT (EsRNDI 
45 LET J=J+ Es NT (GIRND) 
S9 LET R$= Às (3 TO ») as vw 
ss GOTO 15 Figura 3 ) ao X-2562INT (ix-255 
Após colocar o REM e o programa acima, no compu- So TOA (XC2S6) 
se se *RND) 
tador, basta teclar RUN e NEW LINE e começar a digi Z- Z<128 THEN LET 
tar os códigos da subrotina em ASSEMBLY, seguidos Sa sz 
de NEW LINE: 65 
7 
(00! NEW LINE Es 
00" NEW LINE Execute os programas — aperte RUN e NEW LINE. 

| 00' NEW LINE Se modificarmos convenientemente as linhas 50 e 55, 

DO NEW LINE poderemos obter um caleidoscópio que utiliza apenas 

1E0O' NEW LINE caracteres gráficos: 


2AGC40' NEW LINE 


SO LET Z=INT (IZERND) +125+INT 
o es (2 *RND) 
7 7 SS IF 7Z>10 OR 7Z>138 THEN LET Z 


73' NEW LINE | 
'E1' NEW LINE Figura 5 
“C9' NEW LINE Uma outra possibilidade para obtenção do caleidos- 
cópio é reduzir a geração de espaços em branco, supri- 
Neste ponto, a última linha da tela deverá estar indi- mindo a linha 55 e alterando a linha 5Q para: 
cando: 
Seo LET Z=INT (11+*RND) +1I2S=rINT 
MEM 16597 C9 201 (2 *RND) 
Estes caracteres correspondem à memória onde está | EE 
sendo colocado o código (C9) e seu correspondente Ou ainda para tornar a tela menos carregada, utilizem 


decimal (201). Digitando agora a letra Pe NEW LINE, a seguinte linha: 
o programa pára. Façam LIST e NEW LINE para verem 
o que acontece com o REM ... 
Vamos ver agora, o programa em BASIC que utiliza a 
! subrotina ASSEMBLY para gerar o caleidoscópio. Este 
programa produzirá em média, um terço de caracteres Para tirar uma cópia da tela na impressora basta digi- 
normais; um terço em vídeo reverso e um terço de espa- tar “Z”, após introduzir a linha: 
ços em branco, como demonstramos abaixo: 


SO LET Z=INT (IR+RND) + 
Figura 7 


88 IF INKEvYS$=“Z" THEN COPY 


no programa original. 





. Picture yourself in a boat on a river, 

With tangerine trees and marmalade skies 
Somebody calls you, you answer quite slowly 
A girl with kaleidoscope eyes ... 


“Lucy in the sky with diamonds” 
John Lennon & Paul McCartney - 1967 


º, 
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ada” 


REGRESSÃO DE ORDEM N 


O programa a seguir tem por finalidade ajustar uma 
equação, — cuja forma genérica é —: 


Y=C+AX+IA,X +... + AX" 


a um conjunto de pares de valores dados, obtidos na 
maior parte das vezes por medições de campo ou labora- 
tório. 

Na equação dada, temos: 


C = Constante 
Y = Variável dependente 


A,, Às, ..., An = coeficientes da variável in- 
dependente X, X?,..., X". ie 


A seguir, apresentamos um exemplo da variável inde- 
pendente por duas variáveis, sendo X a variável indepen- 
dente e Y a variável dependente: 





Pede-se para determinar a equação de grau 1 e de grau 
2, que ajusta aos pares de valores da tabela. 

O programa foi elaborado de forma coloquial, não de- 
vendo ocorrer dificuldades no seu uso. 

À primeira pergunta indaga sobre o número de casas 
decimais desejadas na apresentação dos resultados. 

Informe, por exemplo, 2. 

A seguir informe o número de pares de pontos, no ca- 
so 10, introduzindo os mesmos. 

Última informação requerida: grau da equação?; in- 
forme 1. 
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Enio Eduardo Kranen 


REGRESSAO DE ORDEM N 
NUMERO DE PARES DE PONTOS?” 186 


X1421] 8 wY(tçã) = 230? 
X (2) = wY(t2)= 33.84 
X (3) = w(3)= 42.81 
X (4) = wYw(4)= 47.182 
X (8) = wYw(S)= 66.73 
A(tõ) = wY (6) = 

KXC(7) = wtf] s 

X (BI = WY(8B)= 

X (9) = wt9) = 

XxX (18) w (t1iõs 

GRAU DA EQUACAO? 

Figura 1 

Resultados: 


CONSTANTE: 
COEF 1º Gras: 


15.854 

1.5 

COEF DETERM R2: 0.87 
INTERPOLACRO: (ENTRE 9 Para sTtoP) 


X= 26.12 
s8.88 


W= 
X= Q 


d. QUER RODAR OS MESMOS DADOS 
COM NOVO GRAU DE EQUACAÃO (5:N)7 


“pm 
Figura 2 


Para permitir pesquisa da equação (grau) que melhor 
se ajusta aos dados, dotou-se o programa da facilidade 
de novo processamento, com os mesmos pares de valores 
X, Y, sem a necessidade de reintroduz í-los, o que se tor- 
na extremamente vantajoso quando a quantidade de va- 
lores for alta. Responda S (sim) à pergunta: 


“Você quer rodar os mesmos dados com novo 
grau de equação (S/N)?” 


Grau da equação? 2 


Resultados: 
CONSTANTE : “158.92 
COEF 1” grau: E essa 
COEF 28 grau: — « Qd 
COEF DETERM R2: 93.99 
INTERPOLACAO: (ENTRE O Para sT0oP) 
= 
Figura 3 


Nota-se, pela comparação dos dois valores de R2 que 
a equação de grau 2 se ajusta melhor aos dados, o que 
também pode ser comprovado traçando-se gráficos das 
mesmas, com os valores de X e Y. 

O processo acima, poderá ser estendido até graus 5 ou 
6 da equação. Lembramos que, à medida que sobe o 
grau da equação a precisão dos resultados decresce, fato 
gerado pelo número de casas decimais com que é efetua- 
do o processamento. Não confundir com as casas deci- 
mais fixadas anteriormente pelo usuário e que foram uti- 
lizadas única e exclusivamente para a apresentação dos 
resultados e não para o processamento. 

A regressão linear é um caso particular da regressão de 
ordem N, onde o grau da equação foi fixado em 1. (Veja 
o exemplo anterior). 


ORDENADAS 


AS X 
1318 


CLS 
REM REGRESSAO CRDEM N 
LET F&=" CINT COU+B.S At) Et)3 


SCROLL 
PRINT 


SCROLL 


“REGRESSAO DE ORDEM N 


ad 


IF Y(tI)<O THEN GOTO 125& 
NEXT E 

GOTO 1538 

CLS 


PRINT 
PRINT “AJUSTE SISTEMA DE CO 
PARRA OBTER COCRDENAD 
POSITIVAS.” 

PARA 


"DIGITE “RUN * 


Bs 
PRINT . 


poa INICIAR. 


SE 
"GRAU DA Eouacas” "“: 
D 





IF D<=S THEN GOTO 1456 
SCROLL 

PRINT 

SCROLL 

PRINT “MAIXZOR GRAU ADMITIDO: 


GOTO 15356 


L. 
“INFORME O NUMERO DES 


1498 SCROLL 
15808 PRINT 
RESENTACAO* 
15190 SCROLL 


Pci DECIMAIS NA AP 


, 
D 
eso pelos om om vos Th 
HH HHDODJUK 
O nn 
poa ms 


FOR I=1i TO D+2 


continua 


LIGUE-SE À 
aNFORMÁTICA 


FAÇA COMO OS 

FUNCIONÁRIOS DA 

pe XEROX, 
SEARLE, COPAS 


, DARLING, 


; nn 
” = a o am 


BASIC e COBOL. 


* Número limitado de alunos por 

classe * 1/3 de todas as aulas com uso 

direto dos computadores, inclusive nos cursos de 
Cobol « Professores altamente qualificados * Cursos 
e apresentados com tr Modernas 


apostilados ansparências * 
instalações com vários equipamentos Dismac, Prológica, 
Sysdata entre outros * Preços extremamente acessíveis. 


SDS 


COMPUTADORES 
NUCLEO | 


A NOVA MANEIRA DE 
- APRENDER À PROGRAMAR 


NÚCLEO Il 
R.Tomás Carvalhal, 380 
(Próximo Estação Metrô Paraíso) 
Fone: 570.6097 


Av.Pacaembú, 1.280 
Fones: 66.7656/66.1513 
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1726 
1738 
1740 
1750 
1760 
17780 
1780 
1790 
* + (K 
188060 
= 1) 

1816 
1826 
1838 
1840 
185€ 
1868 
1870 
1580 
138960 
19808 
19168 
1928 
19390 
1940 
1958 


19608 


2140 
2150 
2160 
2178 
2188 
21960 
22880 
2210 
2220 
22398 
224 0 
2250 
22680 
2270 
2288 
2298 
23880 
2310 


FOR K=12 


LET TítIJ=8 
NEXT I 
LE RNAII e 
FOR IT=â 
FOR J=2 
LET ACJ)=ACtU 
NEXT 

TO D+2 


LET RtK,D+2) =T(K) +Y tI) EXtI) 


1) xt J-aIs 


- 1) 


LET TECK)=TIK) + CI) EX CT) XETK 


NEXT 
LET +tDsD) =T (D+2) +Y (CI) +52 
NEXT TI 
FOR J=z1 TO D+12 

FOR kK=1 TO D+1 

LET RtJ,K) =RtJ+K-I) 

NEXT K 

NEXT 

FOR J=z1 TO D+1 

FOR kK=J TO D+1 

IF R(K,J) <>80 THEN GOTO 1970 
NEXT K 
SLOU 
SCROLL 
PRINT 


GOTO 2618 


“NãO HA SOLUCRO URICA 


SLOU 

SCROLL 

PRINT 

SCROLL 

PRINT “CONSTANTE:-” 
LET U=R(2,D+2) 
PRINT UAL FgS 

FOR J=1 TO D 
SCROLL 

PRINT “COEF * 

LET U=Rty+1,D+ 
PRINT UAL F& 
NEXT 

SCROLL 

PRINT 

LET P=9 

FOR J=2 TO D+1 
LET P=P+R(J,D+2) ECT (US) -Q tu) 


cs“ grau: 
2) 


ET (ID ZM) 


2329 
2338 
234 80 
2356 
2369 
2378 
2380 
2398 
2404 
F & 
2418 
2420 
2430 
2440 


+2) -T tl) EES/N 


“COEF DETERM R2:" .vVaL 
SCROLL 
PRINT 
SCROLL 
PRINT 


e) 
“INTERPOLACAO: (ENTRE 


O PARA STOP)” 


2450 
2460 
2a 78 
24809 
2490 
2508 
2510 


SCROLL. 

PRINT 

LET UV=R(i,D+2) 
SCROLL 

PRINT í''X= " 
INPUT X 

PRINT X 
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25260 
2338 
254 & 
2338 
2Ss80 
=sS7 
258868 
23898 
260909 
2810 
36828 
2630 
264 8 


IF X=0 THEN GOTO =z6160 
FOR J=1 TO D 

LET U=UJ+ARICJ+I.D+D) EX EFE 
NEXT «o 

SCROLL 


PRINT “YW= “;UAL F& 


GOTO 2476 
SCROLL 
PRINT 
SCROLL 
PRINT 


“. QUER RODAR OS HES 


MOS DADOS“ 


2658 
-cc68 
ACAO 
2676 
26856 
2698 
a"D0 
SoTO 
718 
720 
RAMA 
2730 
2740 
asa 
2768 
RUN 

2"78 
2780 
2798 
2806 


SCROLL 

PRINT “Com NOVO GRAU DE E9U 
(S2/N)2" 
SCROLi 
PRINT 
INPUT 95 
JF D94="5“ 
1356 
SCROLL 
PRINT 
COM" 
SCROLL 
PRINT “NOVOS DADOS 
INPUT 9% 
IF Q&="'5" OR G&= 


STOP 
SRUE 
RUN 

STOP 


OR 96="SIM THEN 


“VU. QUER RODAR O PROG 


(S 2N) ** 
“Sat” THEN 


“REGRESSAO DE ORDEM [E 


O 


Xadrez 
Divulgação e 
Empreendimentos Ltda. 


TUDO PARA A PRÁTICA 
DO REI DOS JOGOS 


Xadrez Eletrônico 
Tabuleiros e peças 
Mesas e relógios 
Livros e revistas 
Aulas e Simultâneas 
Organização de Torneios 


Av. Brigº Faria Lima, 1644 - sbi. 61 - 01452 - São Paulo - SP 


Fones: (011) 814-9340 - 814-9539 


ANUNCIE NA REVISTA 


MICROHOBBY 


e tenha uma divulgação eficiente de 


seus produtos ou serviços. 


PUBLICIDADE - FONE: 257-5767 - SP. 











Localizar astros, nebulosas, galáxias ou qualquer obje- 
to no firmamento, nem sempre é uma tarefa fácil para 
os astrônomos amadores. As vezes, por não estarem bem 
familiarizados no reconhecimento das constelações e em 
outras devido à pequena luminosidade destes astros, O 
que dificulta ou até impede a sua localização visual. 

Este programa é uma útil ferramenta quando se deseja 
localizar qualquer ponto na esfera celeste fornecendo, 
uma dada hora solar, à hora sideral correspondente. 

Para aqueles que não estejam bem familiarizados com 
os elementos usados no cálculo, bem como sua termino- 
logia, aqui vão algumas explanações: 

O tempo necessário para o Sol cruzar 2 vezes conse- 
cutivas um determinado meridiano é chamado “Dia So- 
lar”, que é constituído, por convenção, de 24 horas 
solares. 

Quando o Sol está sobre o nosso meridiano seu ângu- 
lo horário, H, é nulo e nosso relógio marca 12 horas ou 
meio dia. Matematicamente podemos escrever: 


t=H+ 12 


onde: 


t 
H 


tempo solar local 
ângulo horário do Sol medido em horas solares. 


Em analogia à hora solar pode-se definir a Hora Side- 
ral. O dia sideral é o intervalo de tempo decorrido entre 
duas passagens consecutivas de qualquer estrela por um 
determinado meridiano e, tem por convenção 24 horas 
siderais. Mas os astrônomos não usam, qualquer estrela 
para medir a Hora Sideral. Existe um ponto fictício cha- 
mado Ponto Vernal ou Ponto y (gama) e, é através do 
ângulo horário deste ponto que se mede a Hora Sideral, 
com uma diferença em relação ao tempo solar; não se 
adicionam 12 horas ao ângulo horário do ponto vernal. 
Matematicamente podemos escrever: 


T=H 
onde: 


T = tempo sideral 
H = ângulo horário do ponto vernal medido em horas 
siderais. 





PROGRAMA DO LEITOR 


HORA SIDERAL 


Fernando L. Fogliano 


E fácil constatar-se que o dia sideral é cerca de 4 mi- 
nutos menor que o dia solar. Desta forma, o ponto ver- 
nal e todas as demais estrelas cruzam o meridiano de um 
determinado local aproximadamente 4 minutos mais ce- 
do que no dia anterior (movimento anual da esfera ce- 
leste). 

Para se localizar um ponto qualquer na esfera celeste, 
os astrônomos criaram um sistema semelhante ao siste- 
ma de coordenadas geográficas (longitude e latitude). É 
o chamado Sistema Equatorial de Referências. Neste sis- 
tema o astro possui, analogamente ao sistema geográfi- 
co, duas coordenadas, a saber: Ascenção Reta e Declina- 
ção. Para melhor se compreender estes elementos, pode- 
mos fazer uma analogia entre Ascenção Reta e Longitu- 
de Geográfica e, Declinação e Latitude Geográfica. Va- 
mos definir então, o que significam estas coordenadas: 


Ascensão Reta « — É a distância em ho- 
ras siderais, contadas a partir do ponto vernal, sobre o 
Equador Celeste, ao Círculo Horário de um astro qual- 
quer no sentido oeste-leste. Varia de G a 24 horas. 
Desta definição vemos que o ponto vernal é a origem 
das ascensões retas, daí a necessidade de localizá-lo cal- 
culando a Hora Sideral. 


Declinação à — É a distância em graus, 
medidos sobre o Círculo Horário, a partir do equador a 
um determinado astro. A declinação varia de 0º a 900 
Norte e de 6 a 96º ao Sul. 


PNC 


PSC 
Dados de alimentação do micro-computador 


1. Hora Sideral a O Hora de Grenwich — Tempo Univer- 
sal HSQ — Este valor pode ser encontrado no Anuário 
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Astronômico do Instituto Astronômico e Geofísico da 
Universidade de São Paulo, na seção Sol, sob o título 
“A Bh T.U. HORA SIDERAL”. Este valor nos fornece a 
posição do ponto vernal, quando for & Hora em 
Greenwich. 

2. Longitude — E uma das coordenadas geográficas do 
ponto onde se dá a observação. É dada em horas, minu- 
tos e segundos. Para que se faça a conversão de graus em 
horas, basta relacionar: 24 horas — 360 graus; 1 hora — 
15 graus. 

3. Fuso Horário — É o fuso horário no qual nos encon- 
| tramos, positivo a oeste de Greenwich e negativo a leste. 
4. Hora Local — É a hora solar na qual estamos queren- 
do calcular a hora sideral. 

Para São Paulo, a longitude é aproximadamente três 
horas, 6 minutos e 30 segundos e o fuso horário é de 
três horas; valor este que vale para toda a faixa Atlântica 
brasileira. 





és INTRODUZA 
R HORA SIDERAL À O HORG DE 
TEMPO UNIVERSAL: * 

38 GOSUB 508 

49 LET HSDEC=DEC 

S6 PRINT AT S.i; "INTRODUZA A L 
ONGITUDE” 

6% GOSUB 5BO 

72 LET LDEC=DEC 

86 PRINT AT S,i;"INTRODUZA O F 
USO HORARIO” | 

90 INPUT Fuso 

116 CLS ns 

1290 PRINT AT S.1I:"INTRODUZA A H 
ORA LOCAL” 


o 


RL LOCAL EZ.saAT 


Tr 


GOSUB 398 


LET HLOLEC=DEC 

LET Tij=HiDEC+FUSOC 

LET DELTS=TU+566.25/5€5.25 
LET TSS=HSDEC+DELTS 


“a 


T56E>34 TREM 


LET TSG=TS6G6- 


IF TS6<9D TREN LET TSG=T5SS+ts 
LET TSOL=TSG-LDEC 


LET GR=(TSL-INT 
LET GB=t€-INT 


SL OU 


PRINT ar 


22, XI; "HORAS" «AT 18,3; INT 


(tTSLI +: ES 
tg43 3 *ES 


18,1, "A HORA SICDER 
132.3: INT ARA 
x 


;RT 1d,13; "MINUTOS ;AT 158.5: B:AT 
165,25: "5SEgUunoosS*“ 
EsS9 PRINT AT 


CUL AR E REseri 
OUTRO 


IF INKREVE="S" 
LF INKEYG=]0N 
soro 


so 


FAST 


PRINT 
INPUT 
PRINT 
PRINT 


INPUT 
PRINT 
PRINT 


NDOS** 
INPUT 5 


3SES 
S90 
4298 
410 
433 
430 
2.2.2 
450 


AS 


PAUSE EG 


CLS 


ro 


AT 


4 
AT 
ET 
M 
GT 
ar 


LS .,.B, "VOCE GUER CR 
SIDERAL. OE 
INSTANTE” (ES, 


TREM GOTO 1I8G 
THEN STOR 

68, );“OLAL & RORRTU 
,8;R 

E.) CERUARNTIS ALIMMIT 


S,4:;M 
26, 3); "OURNTEOS SEG 


12,4:5 


ar 
D=H+5,508 


E=D-60 
LET DEC=hR+E 


RETURN 





COM PREÇOS ESPECIAIS DE LANÇAMENTO 


EXPANSÕES LpIAIX 


A FORÇA INTELIGENTE PARA SEU MICRO 


IOPLAK: Placa In/Out, transforma seu micro numa 

central de comando programado, com 8 entradas e saídas. 
Controla relês, motores, trenzinhos elétricos, etc. 

Preço especial: Completa Cr$ 55.000,00 


BIPLAK: Placa Bip, assegura teclagem correta por 

aviso sonoro. Pode ser programada para assinalar passagens 
de jogos, ações de programas e muito mais. 

Preço especial: Completa Cr$ 42.000,00 


CARAPLAK: Placa de Caracteres, produz os grafismos 

que V. quer e os introduz em qualquer programa. 

É um sucesso na microcomputação, nos EU.A. e na Europa. 
Preço especial: Completa Cr$ 65.000,00 


PLAKMÃE: Placa de conexão, permite o uso simultâneo 
de várias placas TplaK e qualquer outro periférico que se 
liga diretamente aos micros TK (82, 83 e 85), 

Sua aquisição assegura um desconto 

direto de Cr$ 5.000,00 na compra de qualquer outro 
produto TplakK. 

Preço especial: Completa Cr$ 38.000,00 


ESTES PRECOS SÃO VALIDOS ATE 15 DE NOVEMBRO 


SO ATENDEMOS PEDIDOS PELO CORREIO 





| 
tpla EA INDUSTRIA E COMÉRCIO LTDA. 


Rua Cisplatina n.º 768 
Cx. Postal 452 - CEP 09000 - Sto. André - SP 
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Faça agora mesmo sua encomenda, usando o cupom abaixo, 

para garantir esses preços de lançamento. 

Dentro de 30 dias V. recebe a mercadoria pelo Correio, 

abre a embalagem e instala imediatamente a placa TplakK 

no seu micro. É fácil como conectar uma expansão 

de memória! Mas, para receber a mercadoria o mais 

rapidamente possivel, siga as instruções abaixo: 

€ Preencha o Cupom de Pedido com letra de forma legível. 

€ Faça um cheque no valor da encomenda, em nome de: 
TplaK Eletrônica Indústria e Comércio Ltda. 

6 "“Cruze” o cheque, fazendo dois riscos paralelos. 

€ Ponha o cheque e o cupom em um envelope, e envie-o para: 

TPLAK ELETRÔNICA Cx. Postal 452 CEP 09000 - Sto. André - SP 

€ Aguarde até 30 dias para receber seu pedido pelo correio. 


Produto 


Quantidade 


NOME: ES caneca 
ENTIRE: Eni ER o neve 


TELEFONE: 
ESTADO: . 
CHEQUE N;: 


CUPOM DE PEDIDO 


À TPLAK ELETRÔNICA INDUSTRIA E COMÉRCIO LTDA, 
Sim, peço enviar-me pelo Correio, dentro de 30 dias, os produtos abaixo: 





CEP: 
MICROCOMPUTADOR: 
o VALOR: ce 


BIPLAK | CARAPLAK | PLAKMÃE 





Total CrS: 


- CIDADE: . 


aula S 


CURSO DE 


STOP 
A E 





[JC] TK 


CM IMIC IM ANS 


Nesta aula, iremos introduzir um novo tipo de racio- 
cínio usado para elaborar programas: trata-se de um ra- 
ciocínio GRÁFICO que facilita a “visualização” de um 
programa “e cuja utilidade torna-se evidente” quanto 
mais complexo for o programa a ser realizado. 


Este raciocínio é denominado FLUXOGRAMA ou 
DIAGRAMA DE BLOCOS e baseia-se no fato de as- 
sociar, a cada idéia básica usada em programação, um 
simbolo; sendo que, os vários símbolos são interligados 
por linhas orientadas, que indicam o fluxo de execução 
do programa. Outra vantagem deste método é a sua uni- 
versalidade; de fato, como as idéias básicas de qualquer 
linguagem são as mesmas, uma vez feito um programa 
em diagrama de blocos, ele poderá ser facilmente “tra- 
duzido” para BASIC, FORTRAN, ASSEMBLY, COBOL 
ou qualquer outra linguagem, desde que ela não esteja 
estruturada (o significado deste termo não pode ser ex- 
plicado num curso introdutório como este). 


Até o presente, as idéias básicas vistas por nós foram: 


SIMBOLO 
a. Entrada de dados por teclado: 
(BASIC = INPUT) 
Fig. 1 
b. Saída de dados para a tela: 
(BASIC = PRINT) 
Fig. 2 


c. Loops: 


(BASIC = FOR/NEXT) ! 
O Fig. 3 


d. Instruções matemáticas utilizando 
variáveis de memória e comandos 


Flavio Rossini 


ô 


diretos: 


(BASIC = LET/CLS/RAND/ 
[+/—/Etc.) 


e. Início de programa: Fla: 5 


f. Fim de programa: Fio. 6 








LANÇAMENTO 


PASSAGEM PARA O INFINITO 


Sensacional jogo onde você tentará encontrar e sair com um fabuloso tesouro em um 
complexo labirinto, guardado por terríveis polvos monstros, e com mais de 400 pas 
sos Para ajudá lo, você contará com algumas espadas, que garantirão sua sobrevi 
vência na luta com os monstros, é com os prisioneiros encarcerados nas várias pas 
sagens que lhe indicarão o caminho a seguir Totalmente em linguagem de máquina 
com gráficos fantasticamente animados e trás niveis de dificuldade para desafiá-lo 


Preço Cr$ 7 000.00 
MIDWAY 


Uma grande guerra mundial está sendo travada nas águas do Atlântico Você agora é 
o comandante do submarino atômico MIDWAY, sua missão destruir todas as bases 
inimigas em águas brasileiras Cuidado com os navios, aviões e minas espalhados pe 

los invasores Para auxiliá-lo poderá contar com uma frota de navios de reabasteci 

mento, várias bases aliadas e um computador de bordo Um grande desafio com gra 

ficos e várias rotinas em linguagem de máquina Preço Cr$ 5 000,00 


JORNADA NAS ESTRELAS ——— 
A sua nave interpianetária ENTREPRISE necessita livrar a galáxia dos invasores 
Klingon. e você. como comandante da nave, terá a árdua missão de destruí los Um 
jogo famoso no mundo todo em uma de suas melhores versões pela Softkristian, com 
efeitos gráficos sensacionais Preço Cr$ 50 


2: DIMENSÃO 


Agora você já pode ter um fliperama em seu microcomputador em2*º DIMENSÃO dois 
jogos agitadissimos para testar sus coordenação motora Em SPACE INVADER você 
tem os originais invasores atacando sua nave e em ASTEROID você deve pousarem um 
planeta e, para tanto deverá ultrapassar os obstáculos que vbem & sua frente tentando 
destruí-lo Grandes jogos em linguagem de máquina. Preço Cr$ 5 000,00 


VISITA AO CASSINO 


Quatro grandes jogos em um só caça-níqueis, roleta, 21, e perseguição fatal fazem 
parte deste sensacional! conjunto Todos os jogos com gráficos e rotinas em linguagem 
de máquina, para você que gosta de apostar e torcer Preço Cr$ 5 000,00 


10 JOGOS EXCITANTES PARA 1 K 


Dez pequenos jogos para você incrementar e aprender bastante os efeitos de progra 
mação de jogos e trabalhos com vídeo Se você não dispõe da expansão de 16K já pode 
rá ter entretenimento com esta sensacional fita Se você já dispõe de 18 K compre para 
incrementá-los e terá excelentes jogos Preço Cr$ 4 000.00 


Rua da Lapa, 120 grupo 505 
Tels.: 252-9057 -. 232-5948 
CEP 20021 - Rio de Janeiro Rd 


Todas as fitas vão em embalagem lacrada, com gravação profissional, para sua garan- 
tia. A Kristian trocará qualquer fita que seja enviada, com defeitos de fabricação 









































Compre conosco de cualquer parte do Brasil sem 
Despesas adicionais enviando um cheque cruza 
do é nominal à KRISTIAN ELETRÔNICA Lida (não 
precisa visar) E garanta O recebimento de nosso 
mformativo NOVIDADES KRISTIAN totalmente 
gratuito 
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ENGENHARIA 
DE SISTEMAS 
E COMPUTADORES 


Especializada em: 


- Desenvolvimento e implantação de 
sistemas (em laboratórios de análises, 
Imobiliárias, lojas, ...) 

- Serviços de Consultoria 

- Comercialização de programas e 
microcomputadores (JR - SYSDATA, 
TK- MICRODIGITAL, MICRO ENGENHO, 
PROLÓGICA) 

- Cursos de BASIC e ASSEMBLER Z-80 

- Implantação e/ou coordenação de 
cursos de programação em escolas. 


ENSICOM 


ENGENHARIA DE SISTEMAS E COMPUTADORES 


R. Marquês do Herval, 409 - 1º andar - sala 15 
fone 33-2944 - Taubaté - S. Paulo 





g. Continuação do fluxograma, 

quando não há espaço físico: () Fig. 7 
* qualquer símbolo sem ser 
I,FouR. 


Vamos apresentar agora um Outro conceito, talvez O 
mais importante em programação: a tomada de decisões 
por parte do computador! Esta é uma ordem que torna 
o computador capaz de decidir — baseado numa condi- 
ção específica — qual “caminho” seguir na execução de 
um programa. Esta característica é que faz com que o 
computador seja chamado de “máquina inteligente”. 
O simbolo utilizado para tomada de decisões é o da fi 
gura seguinte: 


Fig. B 


Para exemplificar, façamos um programa que “per- 
gunte” um número, coloque-o na variável N e escreva na 
tela BELEZA, se o número for maior do que 100 e 
ALEGRIA, em caso contrário. Este seria o FLUXO- 
GRAMA: 
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“ESCOLHA 
UM 
NÚMERO” 


“BELEZA” 


VULrte 


PAUSA 


CLS 


Fig. 9 


Note que a idéia de tomada de decisão, ao contrário 
das demais, implica em uma “entrada” e pelo menos 
“duas saídas” (todas as outras têm apenas uma entrada 
e uma saída). Surge assim, uma pequena dificuldade ao 
tentar passar este programa para o BASIC, pois as instru- 
ções são escritas sequencialmente, ou seja, numa única 
“dimensão”. A instrução de decisão tem a seguinte 
forma: 


IF |[CONDIÇÃO| IFAÇA ALGO| 


Fig. 10 


Caso contrário, prossiga para a próxima instrução. A 
key-word IF está na tecla U e o THEN na tecla 3. Note 
que esta estrutura é a única que permite o aparecimento 
de duas key-words numa única instrução; de fato, após o 
THEN, o cursor volta a indicar 

Vamos então ao nosso programa: 


THEN 


10 PRINT “ESCOLHA UM NIMERO”. 
SS INPUT N 
SO PRINT N 
o PRINT | 
'S20 IF N+:190 THEN GOTA 198 
6S PRINT “RLESRIA” 
O PAUSE 1560 
Ss ELs 
98 GOTO iB 
100 PRINT “BELEZA 
110 SCTO “O 


Fig. 11 


Na linha 50 o TK toma a decisão: se N > 106: caso 
contrário, prossegue para a linha 60. (O símbolo > está 
na tecla M). 


Perceba como é mais simples normalizar o programa 
em diagrama de blocos. Note que o GOTO não tem sím- 
bolo especial: ele corresponde à uma linha orientada. 
Vale a pena salientar também que não é necessário in- 
cluir detalhes nos fluxogramas: por exemplo, no progra- 
ma anterior o comando de pular linha, não foi incluído. 
Apenas as idéias principais devem ser “desenhadas”; isto 


facilita a visualização. 


Antes de continuar com mais exemplos de utilização 
do fluxograma, vamos apresentar mais duas instruções. 
O TK tem duas velocidades de trabalho: uma lenta 
(SLOW) e outra rápida (FAST). Quando ele opera em 
SLOW, ele se preocupa em executar o programa e, ao 
mesmo tempo, mostrar os resultados na tela; em FAST, 
ele “esquece” a tela e os resultados só são apresentados 
durante uma PAUSA, ou no final do programa. Natural- 
mente, cada uma tem suas vantagens e tudo depende de 
cada caso. Quando o TK é ligado ele automaticamente 
opera em SLOW. No entanto, para digitar um programa 
é mais conveniente usar a velocidade mais rápida; de fa- 
to experimente digitar: 


LET X=125354567599012545575560 
Fig. 12 


A seguir, digite FAST (shift F) e NEW LINE e repita 
a operação acima: (OBS.: Para entender bem estes co- 


mandos, execute os programas dados na aula 3 em 
SLOW e em FAST). 


Vamos então fazer um programa que “chuta” um nú- 
mero; você terá que adivinhá-lo no menor número de 
tentativas possíveis. 


LIVROS PARA TKk, NE Z, CP 


TRINTA JOGOS 


INCLUINDO PROGRAMAS EM CÓDIGO LIS 
TADOS POR IMPRESSORA 


JOGO DE DAMAS, LABIRINTO, GUERRA 
NAS ESTRELAS, ENTERPRISE, PAREDÃO, 
DEMOLIDOR, VELHA, [ASSINO, ROLETA 
RUSSA, CORRIDA DE CAVALOS, GOLF, 
VINTE E UM, CUBO MÁGICO, SENHA, BAN 
CO IMÓBILIÁRIO, BOMBARDEIO, SOM 
POR SOFTWARE, ETC.... 


LANÇAMENTO CR$ 4.000,00 


APLICAÇÕES SÉRIAS 


FOLHA DE PAGAMENTO, BALANCETE, CON 
TAS A RECEBER, A PAGAR, CORREÇÃO 
MONETÁRIA DAS CONTAS DO BALANÇO, 
CORREÇÃO DAS CONTRIBUIÇÕES DO I. 
A.P.A.S., CADASTRO DE CLIENTES , 
CONTA BANCÁRIA, TABELA PRICE, ESTA- 
TÍSTICA, CORREÇÃO DE PROVAS, EDITOR 
DE TEXTOS,RAM TOPER , SUB-ROTINAS 
EM CAUSETTE, CHAINING PROGRAMAS, 
CONTANDO OS BYTES DAS LINHAS, DO 
PROGRAMA, DAS MATRIZES, ECONOMIZAN 
DO MEMÓRIA, ETC... ETC... E 


CR$ 4.800,00 


45 PROGRAMAS 


ARQUIVOS, ESTOQUE, PLANO CONTÁBIL , 
AGENDA TELEFÔNICA, INVASORES, APAGUE 
A TRILHA, CAÇA AO PATO, JOGO DA VE 
LHA, FORCA, DADO, TABELAS, TABUADAS, 
CONVERSÃO DE COORDENADAS, MÉDIA,FI 
BONACCI, PROGRESSÃO, BIORRÍTMO , RE 
NUMERADOR DE LINHAS EM CÓDIGO, ETC. 


X = INT 
(10* RND) +1 


72 EDIÇÃO Cr$ 4.000,00 





Figura 13 MICRON 


continua ELETRÔNICA COMERCIO E INDUSTRIA LTDA 
Av. S Joao "1 Telefone 22 4194. S. Jose dos Campos 
Est. de Sao Paulo 
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" 


Obs.: O símbolo < > significa É 





“ADIVINHE 
UM Nº 
DE 1 A 160” 


OUTRA VEZ” 





O que, em BASIC, ficaria: 


18 RAND 

15 LET X=INT (198zRND) +12 

28 PRINT “RADIVINHE UM NUMERO ED 
E ii à 180 GUEEU VOU ChUTSR 

SO LET I=i 

43 INPUT A 

So cLS 

GO IF Q>X THEN PRINT “O tum. gm 
VE EU CHUTEI E cc DO GgUE c:a 

“8 IF Rc<X THEN PRINT “O NU. q 
UE El CHUTEI E >» DO GUE “:a 

50 IF Rc->X THEN GOTO 188 

98 GOTO 158 

1990 PRINT “TENTE OUTRA VEZ” 

110 LET T=-Z+1 

128 GOTO 48 

138 PRINT “VOCE ACERTOU EM “LH: 


“ TENTAT IVAS* 

Execute o programa! Perceba o uso da variável | 
como “contador” de tentativas. O símbolo < > está na 
tecla T eo símbolo < está na tecla N. 


Este programa poderia ser escrito mais “elegantemen- 
te”, eliminando a linha 90 e substituindo a linha 80 por: 


86 IF A=X THEN GOTO 136 
Figura 14 
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AD DATA 


Educação e Informática S/C Ltda 


CURSOS: 

Introdução à informática 

Programação em linguagem basic 
Programação estruturada 
Microcomputadores - conceitos e recursos 
Preços especiais para grupos fechados 


(empresas, associações, escolas, etc.) 


AD DATA 


Comércio e Serviços de Informática 


Microcomputadores pessoais, 

profissionais e empresariais 
Desenvolvimento de aplicações específicas 
(engenharia, medicina e odontologia) 
Consulte a lista de software AD DATA 


SHOW ROOM: 
Ruo Amália Noronha, 18] - Pinheiros - CEP 05410 - SP 
Tels.: (011) 853-7209/282-0562 









1 CAMISETA 
2 ALUNOS/MICRO 
16 APOSTILAS 
25 HORAS 


CURSOS DE PROGRAMAÇÃO 


(para crianças e adultos) 


SÓ AULAS PRÁTICAS 


MÉTODO APRENDA - FAZENDO 





Rua Paraibuna, 80 - (ao lado da Fundação) 


SÃO JOSÉ DOS CAMPOS 











PROGRAMA DO LEITOR 


CABO COAXIAL 
OU ANTENA 4 e 2 ONDA. 


Sinésio Amorim Filho 


Este é um programa simples, compatível aos micros 
de 1K byte , onde o radioamador ou projetistas de ante- 
nas podem calcular rapidamente o múltiplo de onda pa- 
ra cálculo do comprimento do cabo coaxial a ser usado 
em uma estação transceptora e até mesmo o compri- 
mento de uma antena para 1/4 ou 1/2 onda. É um pro- 
grama de acesso rápido, onde a máquina questiona o 
operador sobre qual o serviço a ser executado — utilizan- 
do-se de uma linguagem comum, e lhe responde 
resultando deste diálogo, um bate-papo entre operador 
e máquina. 

Logo após você ter passado o programa, pressione o 
RUN e NEW LINE e aparecerá um cabeçalho do progra- 
ma, seguido da linha abaixo de uma pergunta: “Você 
quer o cálculo do cabo ou antena?”'. Dependendo de sua 
necessidade, digite um ou outro, mas observe o seguinte: 
se você digitar algo diferente de cabo ou antena, a má- 
quina rejeitará e imprimirá o seguinte: “Você digitou er- 
rado, digite CABO ou ANTENA”. Num determinado 
passo do trabalho, a máquina perguntará a frequência 
a ser calculada, na qual deverá ser digitada apenas a fre- 
quência direta, pois a máquina já está programada para 
trabalhar em MHz. Exemplo: Para dois metros, deverá 
ser digitado apenas 144 ou no caso, uma frequência es- 
pecífica 144.75. Se você digitar 144000 a máquina en- 
tenderá 144Ghz. 

Observação: Após ter digitado qualquer resposta ao 
computador, sempre pressione NEW LINE. 

Agora Mãos à Obra... 


S REM 


“SINESIO AMORIM FILHO 1 





“VOCÊ QUER O C 
AL CUL 070 — DO CABO OU A 
NTENA? * 

SO INPUT AS 

SS PRINT 

56 CLS 

8e o AL = ANTEN THEN GOTO 108 
à Ss “ANTENA” THEN GOTO 25 

70 IF AS<>"CABO, ANTENA" THEN G 
oTO 2080 

75 CLS 

76 PRINT 

7? PRI 


NT 
PRINT “OK... «VOCE QUER O CAL 
DO CABO“ 
PRINT 


192 PRINT 
PRINT as ema a 


FREQUENC IR?" 
INPUT 
CLS 





130 PRINT "-PARA à FREQUENCIA D 
E “ix; CMHZ.. o. 
Ss U=3580 2x 


140 LET Z=U+.665 

145 LET P=7Z/4 

148 PRINT 

149 PRINT 

1580 

155 PRINT 


«.««O0 FATOR E “;P;C M 
ROS” 
LES CLT FITAS eace masa 
166 PRINT 
167 PRINT 


QUER MAIS ALGUM C 


="SIM" TH 


B EN GOTO 40 
180 “ia B$="NÃO” 


THEN GOTO 4185 


185 PRINT “ ESPERO TER MED 


TCHAU...” 


DIGITOU ERRADO, 
CRBO OU ANTEN 


“VOCE 


PRINT *“ 


Goto se 
2390 PRINT “OK... VOCE QUER ANTEN 


PRINT 
e5S4 PRINT 


PRINT ic A FREQUENCIA?" 
260 INPUT 


265 CLS 
LET R=142.5/Y 
U=R/2 


290 PRINT “22000 


ES 68 in 7 2 COMPRIMENTO E DE * 


3182 PRINT | a Rigor mista pen temp 
E OQ iiada ta ga iM DE 









Õ 
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PROGRAMA DO MÊS 


SOMA SIN TÁTICA 


a, 

a tÀ É é g $ 
aa? €v Eua g $ 
+ MH Ta À 2 so 
23 > ' ET 
a 66 
hi 4405 


1449 13] 


Ao se teclar um programa em um TK 82, 83 ou 85€e 
após carregá-lo em fita, sempre resta ao usuário uma 
indagação: “Como saber se todo o programa foi teclado 
corretamente ou se a transferência da fita para o compu- 
tador foi perfeita?” ... A verdade é a seguinte: Mesmo 
que apenas um caractere seja confundido ou apenas um 
bit alterado durante a carga, estes são motivos suficien- 
tes para que o programa seja executado com erro, ou até 
mesmo não rode na máquina. 


PROTEJA SEU 














CONTRA: 

- PICOS DE VOLTAGEM 

- TRANSIENTES DE TENSÃO 

- RUÍDO ELÉTRICO 

- INTERFERÊNCI Ci: 

RÁDIO FREQUÊNCIA (RF) 
POTÊNCIA: ATINGE ATÉ 1,5 KVA 
TENSÃO: 220V ou 110V 


ZENTRANX 


ELETRÔNICA, INDÚSTRIA E COMÉRCIO LTDA. 
NO BREAK ESTABILIZADORES DE TENSÃO 


Rua Elias Mahfuz, 22 - CEP 04746 - Santo Amaro - SP 
Teis.: (011) 522-2159 e 548-0651 
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— E 


a 
e/ 1 4426 
tt 


gs 
= AX 
6, Pos Na 
|32 y 
a 


ly 14 


rh 


A forma que propomos para conferir o conteúdo da 
memória é a Soma Sintática (efetuada após o programa 
ter sido teclado ou carregado da fita). 

A Soma Sintática, consiste na adição dos valores de 
todos os bytes de um programa que fornecerá um total 
tal, a ser checado todas as vezes que o programa for car- 
regado. Nos nossos programas, a partir do número seis 
de Microhobby — passaremos a informar a Soma Sintá- 
tica de cada programa, que deverá ser conferido com o 
valor fornecido pelo seu computador. 

Como o programa que executa a Soma Sintática não 
deve alterar o conteúdo do seu programa original, opta- 
mos por fazê-lo em linguagem de máquina, o que nos dá 
ainda a vantagem de uma maior rapidez de execução. 
Ademais, impomos três condições para a execução de 
um programa: 

1. O programa não poderá estar em uma sentença REM, 
pois muitos programas em BASIC, utilizam subrotinas 
em máquina no REM (Endereço 16 514). 

2. O programa não estando na área de memória destina- 
da ao BASIC, deve ser providenciada uma maneira de 
salvá-lo em cassete. 

3. O programa deverá ser recolocado na memória, de 
forma a ser utilizado em 2, 16 ou 64 K RAM. 

Decidimos então, colocar o programa dentro de uma 
sentença REM, transferindo-o para uma localização de 
memória escolhida acima da área reservada ao BASIC. 

Para criar sua fita com a função Soma Sintática, você 
deve executar os seguintes passos: 

1. Tecle o programa da listagem 1 para carga de código 
hexadecimal. 





G laucus Brelaz 


LISTAGEM - 2 


12 REM 222020220020092022220D00DD 
2920092002902029900320080029000909000 
do) SOPOBDDSDDLZORDODDDDDODOO 


EN INPUT x 
" THEN STO 


o? 
ODE KX$+CODE Xx8t 


2 
ps 
3 
4 
p= 
Ss 
Ed 
2) — 
8 
9 
2 


1 


2. Execute o programa dando entrada no código hexade- 
cimal da listagem 2. 


LISTAGEM - & 


-—— e 
CD 23 OF 21 TD a4g SB 
DC 40 FD ai go as cDÃAaAS 
42 28 120 48 ED SB lá 40 
1B CD AS 40 FD ES FD as 
o 48 CD 2B or ci cs Es 
AZ ED sS2 Fi C8 4E 36 00 
FD B9 23 18 Fa ai 2? as 
ED SB QB4 48 19 FD ai gg 
43 FD 75 G1 EFD 74 G2 FD 
4ô Bi o 46 O nº ês 28 
BO ED 4B B4 480 CS Ss 


Em caso de erro, recomece a segunda etapa. 
3. Tecle POKE 16510,0. NEW LINE. Seu programa apa- 
recerá como a listagem 3 


LISTAGEM - 3 






















S REM LN Z7257RND GOSUB ?£€RND 
CLEAR 5 N NDE (RND GOSUB 2=RN 
D.LN mr EAR FAST CLEAR S RND 
LN E? ST GOSUB 7 LPRIN 
T R w?/ PQUSE SB o 
SUB 2a RND; CLEAR CL 
CLEAR 7º ÉLEAR 7£ R 78 CLEAR 

S RND NDT P  GOSUB GOSUB 2 R 
NOTAN 

22 LET Xg="" 

30 LET X=16514 

40 IF x$="" THEN INPUT 

so IF X (1) =157 THEN, 'sTO 

PRI Xe (a TO 2) 

Ep POKE x, (184CODE kse«cobe Xe « 
2) -476) 

80 LET 

92 LET XE=XS (o TO » 

108 GOTO 


Apague as linhas 20 a 100 e tecle: 
LISTAGEM - 4 


12 SAVE “SoM 
ABB RNANT “SOMA SINTATICA="; USR 
SO PRINT “CONFERE? S/N" 
42 IF INKEvY6="'S" THEN GOTO 66 
sa GOTO 48 
62 PRINT “SOMA SINTATICA NO EN 
DERECO *” 
70 INPUT RTP 
820 POKE 16389, INT (RTP/256) 
lar See 16388 ARTP- INT (RTP,2255 


4a 
20. PRINT USR 16567 
118 ro THEN GOTO 1180 


4. Salve a versão final da Soma Sintática, teclando RUN. 
Assim ela estará pronta para ser usada. 

A versão gravada na fita, ao ser lida corretamente, de- 
verá mostrar a seguinte mensagem: 


SOMA SINTATICA = 2ssas 


Para usar esta mensagem, tecle o endereço para o qual 
você quer baixar o RTP — Ex.: “Se você tem 16K, 
30000" — o programa responderá com o mesmo valor. 
A Soma Sintática será então obtida com: 


PRINT USR (endereço que você escolheu). 





Av. São Luiz, 153 - Lj. 8- 1º Sobreloja - Galeria Metrópole 
Teis.: 257. 61186 269. 1503 - São Paulo-SP 


SEMPRE NOVIDADES 


1 - O MICROCOMPUTADOR NA PEQUENA EMPRESA - 
= 40 PROGRAMAS PRONTOS E COMENTADOS P/ TK82C - 
TK85 - CP200- POR CARLOS LAGROTTA FILHO ............ 3.800, 
T 2. 30 JOGOS P/TK82 E CP200 - Delio Santos Lima 4.000, 
3 - PROGRAMANDO SEU COMPUTADOR - Jogos - 











a en ho AA E DS 5.200, 
4-0 De ENO NO CONSULTÓRIO MÉDICO - 
Luiz Gonzaga Nascimento ..............isiiss ceseseseseesessasees 5.200, 
5 - GATEWAY GUIDE TO! THE ZX8B1 AND ZX80 - 
PAS POSSUO = CODUNNUDEO scsre os orqer si sdsraonnss rom adaga sra naaa das 18.850 






iton 

48 - THE ZX81 COMPANION - Real time 
RECO + UNIAO rs csessisoss usina cexsosesa cio seua criar sau adia 17.400, 

- THE TIMEX - SINCLAIR 1000 IDEA BOOK RAM Dqusticenps vous 000, 








COCA CCI ECT en ana | 
EEE ER T 


DESSE ANE O REC DR RS E Rd SR ii dd E 6d O 
- THE BEST OF SYNC - 80 creative applications programs ..... 
12 - MICROCOMPUTADORES E MINICALCULADORAS - SEU 
USO EM CIÊNCIAS E ENGENHARIA - Royo dos Santos ....... 7.200. 
13 - GETTING cette WITH YOUR ZX81 - More than 

















OU DOOU o ssh sinos us dacosenocisisicoriam ds ora nd as ata sa Cica Nos LUNA 17.400, 
14 - USER'S HANDBGOK TO THE TRS-80 MODEL Ill 

DE RO Ac SA PRE ES A AA 20.000, 
15 - GETTING AGQUAINTED WITH YOUR VIC20 - More than 

DO PONTO cs ins asia res st as saia ice Pas Si So rca r Ad ERUCRASWUSAS 15.000, 
16 - NOVO ABC DOS COMPUTADORES - Lytel............s 3.500, 
17 - 1001 THINGS TO DO WITH YOUR PERSONAL 

COMPUTER MIM: saoronsisssassanisaa ripar inves ano ida Estica s vd 15.000, 
18 - PROGRAMMER'S GUIDE TOCP/M -Libes.............. 19.000, 






bes 
AN9 - TIMEX PERSONAL rob MADE SIMPLE - 
Guide timex / Sinclair 1 
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SOLICITE POR REEMBOLSO POSTAL 
CAIXA POSTAL 9280 
CEP: 01051 - SP. 







Lembre-se agora de carregar a fita “SOMA antes de 
teclar ou carregar seu programa. Após informar o ende- 
reço limite da memória utilizada, tecle qualquer tecla 
para limpar a área do BASIC. 

Convém observar que a Soma Sintática checa o pro- 
grama e as variáveis — caso elas existam — e portanto de- 
ve ser usada imediatamente após a carga do seu pro- 
grama. 

Em programas que iniciam rodando após a carga, é 
conveniente proceder como está especificado abaixo; 
onde XXX, YYY e ZZZ são linhas do seu programa: 


1 PRINT “SOMA SINTÁTICA = " 

2 PRINT USR (endereço escolhido) 

3 PRINT “CONFIRA E TECLE NEW LINE 
PARA CONTINUAR” 

4 PAUSE 6E4 (6x 10º) 


seu Programa 


XXX STOP 
YYY SAVE “Nome do seu programa” 
ZZZ GOTO 1 


Ao salvar seu programa, anote a Soma Sintática junto 
ao nome do programa, no rótulo da fita. Caso o progra- 
ma, ao ser carregado, não dê o mesmo valor, carregue-o 
novamente. O 
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a 
sense 


Uma das consequências da ingestão de álcool pelo ser 
humano é a perda do senso de auto-crítica: por isso rara- 
mente um bêbado admite que está bêbado. 

Imagine a seguinte situação: Você como anfitrião de 
uma festinha de sábado à noite. Um de seus convidados, 
visivelmente “alto”, pega as chaves do carro e resolve 
voltar para casa. É óbvio que você tenta demovê-lo da 
idéia, mas ele, como está bêbado, não tem consciência 
do perigo e teima em sair. Qual a solução? pegá-lo pela 
curiosidade e desafio frente a um computador. Uma su- 
gestão: Desafiá-lo a medir a rapidez de seus reflexos em 
um TK. Logo o desafio vai se generalizar e todos os seus 
convidados estarão competindo para quebrar o recorde 
(Aqui na redação, a Nancy é a nossa recordista e 
já foi aclamada como um exemplo da óbvia superiorida- 
de feminina). O desafio proposto a todos irá permitir 
que você sirva um café sem açúcar ao seu amigo e aos 
demais convidados, dissipando assim, os “vapores etli- 
cos”, sempre presentes em reuniões de sábado à noite”. 

Ao iniciar o programa, o computador coloca as ins- 
truções na tela. Digitando "S”, tente começar. 


ESSE PROGRAMA VAI MOSTRAR OS RE- 
QULTADOS DE 19 TESTES DE REadao. 


SUANDO “Sº FOR PRESSIONADO um 
NUMERO ALEATÓRIO IRA” APARECER NO 
QUADRADO ABAIXO. ENTRE COM O Ntt- 
HERO O MAIS RAPIDAMENTE POSSIVEL 
1550 ACONTECERA” ATE? O DECINMO 
TESTE SER COMPLETADO, 

APOS O GRAFICO, DIGITE NEW LINE. 


NUMERO : - 





Figura 1 


No quadrado, aparecerá um algarismo de G a 9 e você 
deve digitá-lo o mais rapidamente possível. Acertando, 
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TEMPO DEF 






REAÇÃO 


Carlos Eduardo R. Salvato 











ele desaparece e outro algarismo aparece no quadrado. 
Ão terminar o teste, o computador apresenta os resulta- 
dos abaixo: 


TESTE DE REACRO 


— o — —  — a us uu. ue uma uu uu ua uu 


+ RAPIDO 
+ DEUAGAR 


MEDIA :-- Q.245 
MEDIA + RAPIDA 

Q.245 

POR NANCY a 


o o 
pm 
o 
Coma mm TEMA 

PEIAATDERETDIATSEKITA 
ESG PGS PESE UIÇES LOSE RE STS ASRINST SO DOS 1 PD Os Sm re 
[DA Ud ade DEDE de RS Pen CR ERRA SEA 
RESRESPOS STO POSERRP IRON CIRS DM 36 385 
REGE SETA ELO CIRIEERE SS Us pe pigs aoss o tas 
DIDO Mo | POR IADEPO SAD PTOS ATI ESLÁCS 
PANIC 3 RS E 2] 
RENATO TH PALITOS 
DOES. 11 1 LAS CESAR CASS AS MOTTA STE BRS DD já ORE AEE adO 
CEREESENDSE 
Trees 


Se você obteve o tempo mais rápido (ou se você foi 
O primeiro), seu recorde ficará registrado por toda a 
eternidade. . . (ou seja, até o computador ser desligado). 
Você poderá registrar o recorde, gravando outra vez o 
programa em outra fita, usando o seguinte comando: 


GOTO 1070 


Após digitar o programa da listagem anexa, jogue pelo 
menos uma vez, iniciando com um RUN. A seguir, grave 
o programa em fita usando o seguinte comando: 


GOTO 1070 


Este programa pode ser rodado num TK82 ou TK83 
com expansão; num TK 85 ou similar. 


ai ai cics 





1208 
FOR P 
138 
| R APAR 
140 
E COM 


LET F=1008000 
DIM N(18) 
CLS 

RAND 

LET Q=1069009060 
“LET SabB 

LET R=0 
PRINT AT 4.0: “ESSE PRosrama 
MOSTRAR OS RE-“ 

PRINT AT S,OB; V“SULTADOS DE a 
Q TESTES DE REACÃAO.” 






PRINT AT 9,8; "QUANDO “CS” 
RESSIONADO UM” 

PRINT “NUMERO ALEATORIO IRA 
ECER NO* 

Ca "| QUADRADO ABAIXO. ENTE 


1520 PRINT “MERO O MBRIS RAPIDCAME 

NTE POSSIVEL" 
168 PRINT “ISSO ACONTECEREG! ATE 
& O DECIMO TESTE SER COMPLETADO 





. 176 PRINT “APOS O GRAFICO.DIGIT 
| E NEL LINE." 
| 158 PRINT AT 16.16.:.'% 
| 196 PRINT AT 17,16; 
2984 PRINT AT 15.16:' 
216 PRINT AT 195.186; 
22860 PRINT AT 290,15, "Eee 
238 PRINT AT 15.5; "NUMERO 
242 POKE 156457.255 
2es80 PALISE 32999 
260 IF INKEYr$='S" THEN GOTO 2560 
27e Goro 240 
2882 FOR kK=1 TO 18 
2980 PRINT AT 158,18; *“ 
308 FOR 0=8 TO INT (RND+66) 
3180 NEXT O 
328 LET B=INT I|iRND+16) 
350 PRINT AT 15.158:A 
348 FOR 7=2 TO 14009000 
3582 POKE 16457.255 
364 IF CODE INKEY5=A+25 TRE: GO 
TO 380 
370 NEXT T 
so. LE! NtRI= 
3980 NEXT K 
4280 CLS 
ace” PRINT AT 2, 1;"TESTE DE FERC 
420 PRINT AT 2.ã: =nn=2====2===s 
238 PRINT AT 4,1; "RESUiITEGrCOS — 
440 PRINT AT 5S,d, ------————— 
456 PRINT AT 7.0; 7'+ RAPIDO. 
4628 PRINT AT 9,5. + DEVESSER 
1.70 PRINT AT 12.0; "MEDIÊG -- 
400 PRINT AT 2)ser;) "oc TESTES o" 
4390 PRINT AT 5B,áS;CTCLAT E,iS;* 
E SME 49; CMROSAT 3, IB; "PS 
52080 PRINT AT 12d ,19;"S“:AT 215,15 
ESA 16,149; “6";AT 27,19: "5 
Ss18 FOR 0=2 TO 28 
520 PRINT AT O,DI;pt-" 
232 NEXT O 
ada LET A=a 
ssa FOR K=i TO à 
S68B LET NCK) =CINT CINCK)I 2.823 +. 
5)1) 4,:1208 
70 IF N(K5<0 THEN LET Q=HN(E> 
5390 IF N(K) +55 THEN LET S=hHiiks 
sS98 LET AQ=A+-+NiK? 
ES NEXT kK 
SIR LET AD=(INT ((B352180)>+.]2>> «10 
2a 
6G>2€ PRINT AT 7.,i1ã:;6 
bB3& PRINT &T S,11;5 
Eid PRINT AT 132.114: 
6S€ LET B=ztINT (0%.9) *ã9:7 :-Z€ 
66€e LET C=(INT ((5S%2.,.2)218'3:3./16 
670 PRINT AT 20,17:5B 
65S€ PRatiT AT ES.+7:c 
694 PRINT MT ãA.LIAITLrRE+LOS “vs 



















Neste verão 
coloque seu filho na 
era da informática. 
Ou deixe-o descansar 
no passado. 


e Cursos de informática especiais para estudantes de 
I2 e 2º graus 

* Cursos especiais para férias, e também aos sábados 

º Clube do Micro, equipado com os melhores 
microcomputadores 

º Palestras, Conferências, Seminários 

* Biblioteca especializada 

* Programas educacionais 

* Consultoria e Assessoria Empresarial 

* Cursos especiais para microempresários 


Você pode contar com o CENADIN para mais 
Informações sem compromisso, em São Paulo, 
pelo telefone 287-4716 ou via correio. 


a 
PRN 
Com HN 
CENTRO NACIONAL DO DESENVOLVIMENTO DA INFORMÁTICA 
Rua José Maria Lisboa, 580 - Jd. Paulista 
Tel.: (011) 287-4716 - CEP 01423 - São Paulo - SP 
NOME: 
ENDEREÇO: 
CIDADE: 








7260 LET EC=tC-5B),35 

718 FOR Q=1 TO 180 

720 LET E=(NIG) -B) 4ZD 

7380 FOR Z=2 TO E+ã 

«42 PLOT 43+(2+40),Z 

“588 NEXT Z 

760 NEXT GQ 

72 IF A<F THEN GOSUB 555 

782 IF A<F THEN LET F=&R 

7920 PRINT AT 16,80: "MEDIP + G&RPI 


S6º2 PRINT AT 18,5,F 
818 PRINT AT 260,1;“POR “:AS 
820 IF INKEYg&<>"'* THEN GOTO dB 


838 GOTO 5828 

Sse LET R=8 

35e LET 5B$="ÊB VOCE OBTEVE EB 
868 LET C&="MEDIA + RAPIDER"” 

870 LET D$="ENTRE COM NCHE“ 


398 PRINT AT 16,0;ES | 
908 PRINT aT 280.0; Eã | 


936 LET R=R+1 
946 PRINT ST 18,0;C3 

950 PRINT AT 16,0.B% 

968 PRINT AT 290.0, 05 

978 FOR 0=8 TO 28 | 
988 NEXT O | 
396 IF R«<3 THEN GOTO 55€ | 
1POR INPUT AS 

1210 IF LEN A$>10 THEN GOTO 1990 
“022 FOR 0=16 TO 26 STEP & 

130 PRINT AT C0.9:Es$ 
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QUEBRA-CABEÇA 





“ - PRO 
N “+ 


L.G.M 





A idéia de contactar civilizações de outros “mundos” 
não é recente entre os homens. Deixando de lado as 
crendices populares e as mediocridades publicitárias, a 
imaginação humana chegou a produzir muitas obras so- 
bre esse assunto. Clássicos literários como “Micrômegas”, 
de Voltaire; “História Cômica dos Estados e Impérios da 
Lua e do Sol”, de Cyrano de Bergerac e “Da Terra à 
Lua” de Júlio Verne são, juntamente com um grande 
número de “Science Fiction”, bons testemunhos de boa 

ualidade (Figura 1). e? O RE 
, QUA À a ie O 










á 






Esta seção conta com a colaboração dos membros da MENSA INTER. 
NACIONAL — brasileiros e estrangeiros residentes no Brasil. 

A MENSA é uma organização sem fins lucrativos, originária da Inglater- 
ra e que conta com milhares de membros espalhados pelo mundo inteiro. 
Entre estes, podemos citar Isaac Asimov, Arthur C. Clarke, Clive Sinclair 
e o recentemente falecido R. Buckminister Fuller (o poeta que inventou à 
Cúpula Geodésica). 

Os principais objetivos e bases de atuação da MENSA são: promover 
e encorajar o desenvolvimento da inteligência humana para benefício da 
humanidade, incentivar a pesquisa sobre a natureza e promover um am: 
biente socialmente estimulante para seus sócios. 
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MENSA 


International 
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Renato da Silva Oliveira 


Também nos meios de comunicação de massa, são 
inúmeros os exemplos da procura de outros mundos, co- 
mo a novela radiofônica “Guerra dos Mundos" narrada 
por Orson Welles , no início do século, Esta novela te- 
ve maior repercussão que os “contos de fadas'' cinema- 
tográficos “Close Encounters” e “E.T.” de Steven 
Spielberg que, por assim dizer, invadiram facilmente a 
Terra aproveitando-se da boa vontade das pessoas. 

Até mesmo o “Gran Circo EEUU” produziu, bem ao 
seu estilo, um famoso relatório sobre possíveis seres ex- 
traterrestres no famoso “Livro Azul” da U.S. Air 
Force. 

Como não poderia deixar de ser, os cientistas produzi- 
ram, também, alguns trabalhos (provavelmente os mais 
sérios e audaciosos), sobre sua velha idéia, assim que sur- 
giram oportunidades propícias. Desde grandes equivo- 
cos, como os “Canais Artificiais de Marte” e os “Little 
Green Men (L.G.M.)” até as mensagens levadas pelas 
sondas PIONER Xe Xle VOYAGER lell. 





Para o ingresso na MENSA é necessário apenas que o candidato se 
submeta a um teste homologado pela MENSA INTERNATIONAL, supe- 
rando o nível médio de inteligência de 98 por cento da humanidade. 

Informações a respeito, podem ser obtidas através de carta enviada para 
esta seção, no seguinte endereço: 
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SEÇÃO QUEBRA-CABEÇA 
Rua Bahia, 1049 

Cep 01244 — São Paulo 
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Provavelmente, um dos mais interessantes empreendi- 
mentos científicos visando a comunicação com possíveis 
sêres extrategrestres, foi a mensagem enviada ao espaço 
com o radiotelescópio de Arecibo em Puerto Rico (o 
maior radiotelescópio de espelho esférico do mundo, 
com cerca de 305 metros de diâmetro). 





Figura 3 


O interesse dos cientistas em contactar com outras 
(possíveis) civilizações não é gratuito. 

Apesar de altamente improvável, a pequena chance de 
sucesso justifica o esforço desprendido. Atualmente, 
através de uma equação simplificada, obtida pelo radio- 
astrônomo Frank Drake na década de 60, estima-se que 
dentre aproximadamente 200 bilhões de estrelas de nos- 
sa galáxia, cerca de um milhão (menos de 0,001 por cen- 
to) têm condições de abrigar civilizações tecnologica- 
mente desenvolvidas. Mesmo sendo otimista e supondo- 
se que todas elas sejam “povoadas”, a probabilidade de 
conseguirmos nos comunicar é ainda desprezivelmente 
pequena. 


N=R*.fg.fp.ne.fi.ft.l 


Equação de Frank Drake 


onde: 


N = número de civilizações tecnológicas da Galaxia 
R* = taxa média de formações de estrelas da Galaxia 

fg = fração de estrelas com condições de possuir sistemas planetárias 
fp = fração de estrelas que possuem um sistema planetário 

ne = número de planetas habitáveis por sistema planetário 

fe = probabilidade de surgimento de vida num planeta 

fi = fração de planetas habitáveis com vida inteligente 

ft = probabilidade de uma civilização desenvolver tecnologia 

L = longevidade de uma civilização 


Figura 4 


De certo modo, estamos fazendo — com algumas 
desvantagens —, a vez do macaco dos versos de Sir 
Arthur -Eddington, transcrito no início deste artigo. O 





CONVERSE 
COM 
PROFISSIONAI 


ASSESSORIA 


Antes da escolha de seu micro, 
nos diga qual o seu problema. 
Nós o orientaremos 
na escolha do micro CERTO 
para você 
ou sua empresa. 


SOFTWARE 


Linha completa 
de software aplicativo. 
Desenvolvimento de software 
específico para sua 
necessidade. 


CURSOS 
BASIC |, BASIC AVANÇADO 


para TK e CP-200. 


- Excelente material didático, 
no máximo 10 alunos 
por classe e 1 micro 


SHOW ROOM E VENDAS: para cada 2 alunos. 


DATA SULUTIOA 


VENHA NOS VISITAR 
AV. EUSÉBIO MATOSO, 654 - CEP 05423 - SP 
BEM EM FRENTE AO SHOPPING CENTER ELDORADO 


FONE: 813-3355 


macaco pelo menos sabia que tocar música é possível, 
enquanto nós (humanos), não sabemos sequer se exis- 
tem outras civilizações além da nossa. 

Se você teve paciência de ler tudo até esta linha, ao 
menos justifique seu trabalho lendo ainda as que se se- 
guem. Você verá que tudo se relaciona ao tema de nos- 
so “Quebra-Cabeça” deste mês: “L.G.M. ou Mensagem 
de Vega?”. 

Citamos, de passagem, o equivoco científico dos 
"L.G.M.(s)”. Essa sigla surgiu para os quatro primeiros 
pulsares descobertos: L.G.M.; LGM,, LGM, e LGM,. 
O primeiro deles foi descoberto em meados de 1967 
por uma jovem radioastrônoma, Jocellyn Bell, através 
do radiotelescópio da Cambridge University. Esses 
“objetos” são notados, devido as intensas e regular is- 
simas emissões de micro-ondas que deles nos chegam 
(em geral cerca de uma por segundo). A esperança qua- 
se religiosa dos astrônomos em detectar vida fora da 
Terra, fez com que batizassem — oficiosamente —, as 
quatro primeiras dessas fontes, de ' Little Green Men”, 
pensando tratar-se de “'sinais inteligentes”. Logo, po- 
rém, muitos outros pulsares foram descobertos e o equí- 
voco “L.G.M.” foi desfeito. Hoje, sabemos que os pulsa- 
res são provavelmente, estrelas neutrônicas em alta rota- 
ção. 

Essa estória ilustra, muito bem, a boa vontade e o 
entusiasmo dos cientistas em admitirem como possível 
a comunicação com civilizações extra-terrestres (se elas 
existirem, é claro!). 


continua 
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Ô Quebra-Cabeça deste mês ide de uma estó- 
ria semelhante: f 

“Um dos nossos leitores, o gr. Nabor Rosenthall, 
construiu em seu sítio próximô à à pequena cidade de 
São Tomé, um radiotelescópio” “caseira”, a qual 
tem, acoplado, um TK85. No primeiro dia de setem- 
bro deste ano, precisamente entre as 21 e às horas, 
ele recebeu uma série de pulsos de micro-ondas, pro- 
venientes de um ponto do céu cujas coordenadas 


Rao: é — N 38º 46' 
Ascerição Reta; «= 18h 36' 8" 


Essas são, exatalmente, as coordenadas da estre- 
la Lyrae (Vega). 


. 


- Nabor percebeu que, se.as- 

os — durante os quais recebia os 

r 1 (um) e aos períodos “mudos'* 

associasse o valor O (zero), obteria 

uma sequência de uns e geros, aparentemente regu- 

lares que se repetiria, mais ou menos a cada uma 
hora. . 

Assim sendo, o Sr. .Nabor, por não ter ainda con- 
clusõês conviricentes, resolveu nos escrever para que 
pudéssemos auxiliá-lo a chegar a tal conclusão e 
também solicitóu- “nos que tentássemos obter infor-. 
mações com outros leitores, a respeito da sequência: 

se ela é ou não uma mensagem e em caso positivo, 
“qual o seu significado?” . 

A “sequência está listada a seguir e o Quebra-” 
Cabeça consiste em — com o auxílio do TK —- des- 
cobrir se ela é um novo equívoco do tipo “L.G.M.” 
ou se é regimente uma mensagem+"E.T.”, prove- 
niente de Vega. Se a respesta for positiva, vocês 
devem decodiHficá-la e Do (e: o seu significado. 


+ 
o 
(o) 


A ordem em que os os (Os e 1's) foram rece- 
bidos são indicados pelas setas no início e no fim da 
IBtagem. à i 


Rir ne e o e O 


. 24 h hdi 22 h , 21 h 


— 100 
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SdddrdddGA A IDDADA GDA DOC AAA DADAGGO ADAM ADAAADOSDAASDSGADANGO 


16 h 
16 h 


SAGA DIIDA DAM AGDADD Ad Ad DADOS OC DAMA AAA DDD AAGDA ADO 
SossAsdrdaGADDA ADA dA DOADA ADDDAADOOSASGSSDADAM ADO MAMA DIDADO 
Senso gArdSod added dAGAGA rd dd DADDADADIP ADA GOSA AA DADO 


SD GO DADO Pr GO dede gerada dd agarre DADA DADO 
SOS “nso4SS5ISd ADA ADA SSD rddnga dera AA DODOA DASH ADS 
6699499 4AGIÍSO CA GO dd Der ad green DADA DADISSIAADIADO 
SAGAS orABO AGA Do Gr das DA dg dad DADADDAADASDOA ANDO 


SODA ADOSSAASOSDADA DD dd dAGa dad DA dad DADA ADSSDA DADO ADO 


GOA AOS ASDSSDA ADO DOGG dd agrada GADANDASADSSSS DADAS OSO 
SSD DAS GGASGA dd dida Deda Dada Do dA DA DDS ADS 
SODA dAdDASSA DAS AASSAGG Ad AdDAd Ad DO AMADA A DIDAASSDA SOS 


17h 


DOAAGAAAABAODDOSSSSDO ASSIS AdAGA Add DAMADDADS DID AAA DOSDDADO 


ESTA É A SEQUÊNCIA 





17h 


DOAGAGD AMA DIAAGANDDASS AG GOA nina nad gana a ns asa anannsssos À 
DOAAADAADANIDONGOAGO GOIS AGO ADA ADAA AA ADOAOAADOGASDANDAADO | 
SODA dA GA GOD ADA A DADAS GASDODCdADADAMDAASDSACGSEDADA AA DADAS 


18h 
18h 


ud 


19 h 
19 h 


* 


20 h 
20 h 








EL 


PS 


NETIZ 


AIN 


Aqui está, num artigo escrito por nossa analista de 
Software, a resposta da carta escrita por nosso leitor 
Fernando José Strobel, que pedia informações a respei- 
to de gravação de fita de dados. Um pedaço do texto da 
carta era o seguinte: “Peço que a sua revista publique 
um artigo, explicando a armazenagem de dados em fita, 
como um exemplo bem complexo, com fichas lógicas 
e fichas físicas”. 


Para resolvermos sua dúvida a respeito das funções 
de armazenamento para o TK 85, fizemos um programa 
utilizando os comandos DLOAD, DSAVE, DVERIFY 
e o mesmo pode ser feito para os comandos DHLOAD 
e DHSAVE, mas em Hi-Speed, 

Através desses comandos, é possível o armazenamen- 
to e a recuperação de informações numa fita cassete, 
permitindo assim, o uso de um grande arquivo de dados. 
Esses comandos são utilizados com a função USR, 
acompanhada do endereço inicial da subrotina, em lin- 
guagem de máquina do comando a ser utilizado. 


ENDEREÇO FUNÇÃO DE CADA 
INICIAL COMANDO 


8288 
9816 
8305 


COMANDO 


DSAVE 
DVERIFY 
DLOAD 


Gravação do arquivo 

Verifica a gravação 

Lê a fita e armazena no buffer 
indicado 

Grava na fita em Hi-Speed 

Lê a fita em Hi-Speed 


DHSAVE 
DHLOAD 


9008 
9189 





Para melhor compreensão, dividimos o programa em 
várias partes, portanto, digite todas as linhas exatamente 
como estão, porque elas formarão, no final, o seu 
programa mestre. 

O programa começa armazenando os endereços de ca- 
da subrotina, em linguagem de cada comando: 


PROGRAMA 41 

LET DSAVE=8228 
a 

a DES CUE Sa 


LET e 
LET DHLOBD =2I109 


CO SO Pe 


Figura 1 


Vamos inicialmente criar uma ficha física com 10 fi- 


chas lógicas. Mas, o que é uma ficha física? E uma ficha 
lógica? 
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AS FUNÇÕES 
“D' DO IK3 


Nancy Mitie Ariga 


Suponhamos que você deseje um arquivo com nomes 
e telefones. Um determinado nome com o seu respectivo 
telefone, formam uma ficha lógica. Um grupo de fichas 
lógicas (no nosso caso 10) formam uma ficha física. 





ficha lógica 


= 


ficha física ORAS 


Digitando o programa 2, você criará uma ficha física 
que, posteriormente será gravada. Cada ficha lógica, con- 
terá um nome com no máximo 15 dígitos e um telefone 
com no máximo 8 dígitos que serão armazenados no 
buffer, formando a ficha física (B$) que poderá conter 
no máximo, 230 bytes. 

1 ficha lógica » 15 bytes do nome + 8 bytes do 
telefone = 23 bytes. 

10 fichas lógicas > 230 bytes 


PROGRAMA 2 
1009 REM CRIACAO DE FICHA FISICA 


1918 DIM E$t238) 
1938 DIM N$125) 
1838 DIM TELE) 

1BDS4B LET R=1 

19% FOR I=i TO IS 
2189€8 SCROLL 


1160 LET CS&=N$E+TS 

1170 LET B$S(A TO ALLEN CE-1)=E6 
1188 LET AR=A+LEN C& 

1198 NEXT TI 

1280 SCROLL 
1218 PRINT 


1213 SCROLL 


1314 PRINT “B/GRAUAR DIGITE «REA 
LINE >* 


12298 IF INKEY$="" THEN soTo 1298 


Figura 3 


“FICHA FISICA COMPLET 


Digite RUN e aparecerá na tela: 

NOME = 

o 
Figura 4 

Digite um nome e NEW LINE: 


NOME =MICRCHOBBY 
TELEF e 


“am | | 
Figura 5 
Digite um telefone e NEW LINE: 
NOME =MICROHOBBY 
TELEF. =256.5345 
NOME = 
“pm 
Figura 6 


e assim por diante. 


Agora que você possui uma ficha física em seu buffer, 
vamos gravá-lo. Digite o programa 3, que possui o co- 
mando DSAVE. 


PROGRAMA 3 


+ E Alas GRAVACAO FICHA FISICA 
2806 PRINT “P:ERDUAR BPERTE RECO 
RD DO GRBUB-DOR E NEW t INE 
20207 IF INKEY Ag THEN GOTO 2287 
22010 LET Z=iEN Bg3 

2020 LET Z$='8" 

2030 LET BC=USR DSAVE 

2042 5LOUW 

2050 IF BC=a THEM PRINT BT 


Roc»: cd À THEN PRINT BAT 7,8; 
2670 PRINT “NOURB CRAVBCBO (3:2N19 
hi IF INKEy$="5" THEN Goro 22R 
2085 IF INKEvy5S=0N"º THEN GOTO aee 
22924 GOTO 2084 


“ . “4 
Ta; 


Figura 7 


Em Z está definido o número de bytes do buffer es- 
colhido e que será gravado. Z$ seleciona o buffer que se- 
rá gravado (no nosso exemplo Z$S = “B”', porque em B$ 
estão armazenados os dados da ficha física). 


BC é uma variável qualquer, criada para utilizarmos a 
função USR, onde após a execução do comando 
DSAVE, será armazenado o código de reportagem. (Ver 
código de reportagem, página 29.7 do manual do TK 85). 


Certifique-se de que o MIC do TK está conectado 
com o MIC do seu gravador, aperteo RECORD e digite 
NEW LINE. O comando DSAVE será ativado e a primei- 
ra ficha física estará sendo gravada. 


Se a subrotina DSAVE foi realizada corretamente 
(BC = (j), aparecerá na tela um “OK”. Caso contrário, o 
código de reportagem aparecerá na tela (consulte o ma- 
nual do TK 85, página 29.7). 

IMPORTANTE: Após o término de cada comando de 
armazenamento, devemos retornar ao modo SLOW, por- 
que o computador entra nomodo FAST com o início da 
subrotina, em linguagem de máquina. 

Agora que você gravou em sua fita cassete, certifique- 
se que sua gravação foi feita corretamente, digitando o 
programa 4. 


PROGRAMA 4 


3020 REM VERIFICACÃO DA GRAVACÃO 
S2RsS CLS 

3818 PRINT “P-/VYCRIFICACBO RESOSI 
NE à FITA” 

222 PRINT C“ARPERTE O FPLoy CU eRR 


32030 PRINT “DIGITE NEW LINE 
3042 IF INKEvy$="" THEN GOTO FAL 
2250 LET BC=USR DUCERIFY 

so SLOu 


PRINT 
3065 IF 8SC=& THEN PRINT “ok” 
=p É Sa IF BC<>2Q4 THEN PRINT CERRO=" 


gd PRINT “NOVA VERIFICACDO Tas 
seas IF IMKEY$=]053" THEN GOTO 208 
38883 IF INKEvS$=]Nº THEN GOTO MEM 
3120 Goro aeas 


Figura 8 


Conecte o EAR do TK85 com o EAR do seu grava- 
dor. Diminua um pouco o volume do gravador, aperte o 
PLAY e digite NEW LINE. O comando DVERIFY foi 
ativado, atuando como se estivesse lendo a fita, mas não 
armazena os dados na RAM, permitindo a você, verifi- 
car se as informações foram gravadas corretamente sem 
destruir o conteúdo da RAM. Após a execução da subro- 
tina aparecerá na tela, o código de reportagem. Se apare- 
cer o código de erro diminua, pouco a pouco, o volume 
do gravador até surgir um “OK”, significando que a gra- 
vação foi boa e que a fita será lida neste volume de som; 
caso contrário, será informado o erro. 

Deseja outras fichas físicas em sua fita cassete? Ela 
pode conter inúmeras fichas físicas, que devem ser 
gravadas uma após a outra. Sua fita ficará assim; 


——- Ne e” Ve pe? ue ee” Ve e? Voe e? o 
Co E HR ? s“ Figura 9 
Ss Ss 


“> « 


e 2 


«s 


continuas 
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GAP é um espaço entre suas fichas físicas de aprox i- 
madamente cinco segundos ou mais, antes que a segunda 





ficha física seja lida. 


Vamos utilizar as informações armazenadas em sua fi- 
ta cassete, através de uma pesquisa. Digite o programa 5. 





PROGRAMA S 


+022 REM PESQuUISS 

4+2853 CLS 

40180 PRINT OT 7,3; “UNTE DESE ER: 
4820 PRINT ar s3;01. NOME 

4038 PRINT QT 411,3; "2. TELEFONE 
4.844 a ” 3 * “e ” RELpgcesa Er 


PRINT BT 1 
OS NOMES COMECA- 
ETERM sec LETRAS 


Pos cOM & 


di INKEY$=“1" THEN cora sas 
ic IF INKEY$=02" THEN SOTO css 
Ee IF INKEY$="32" THEN coroa var 
42030 GOTO S4esa 

2200 REM PESQUISA CE NOME 

2225 CLS 

9010 PRINT “QUAL OQ TELEFONE 2” 
020 INPUT T& 

038 PRINT Tg 

29035 PRINT 

3040 INT “REBOBINE AR FITA 

pica id “RPERTE O PLay DO CRR 
5062 PRINT “DIGITE NEif CL IME ” 
5065 IF INKEvyS$=]" THEN GOTO GRas 
5070 LET Z=& 

5075 DIM Bg4(228: 

280 LET Zg="8* 

090 LET BC=USR Di ore 

3095 IF AC=i THEN GOTO 5555 

9120 IF BC<>8 THEN SOTO ssSg2g 
120 FOR I=i TO Z38 STEP Za 

130 IF = TO I+22º -T3 THEM 
coro seo 

140 er x 

9328 GOTO 5878 

98200 SLOUW 

39180 PRINT “ERRO="; BC 

2915 PRINT 

Té ita PRINT “APERTE STOP DC craua 
S9320 PRINT “APERTE NEt LINE Po M 
OUA PESQUISA 

940 IF INKEy$=º" THEN GOTO sSs4a8 
39550 GOTO duaaar 

399539 SLOW 

9656 PRINT 

Sos” PRINT 

ócio asp iad 


0959 PRINT 
ERA Dr NA 


“NãO FOI ACHADO ESTE 
FITA” 
PRINT 


9962 PRINT C“NOUR PESQUISA (Semi 
dad IF INKEY&=05" THEN COTO ia 
E IF INKEY$='Nº THEN GOTO MEN 
2366 GOTO 3364 

6282 SLOW 

605 PRINT 
Soa PRINT “APERTE STOP DO ERRUA 
9615 PRINT 

6020 PRINT “NOME=C;aASg(I TO I+144 
3630 PRINT “TELEFOME=",R$trIsSis T 
O I+22) 

S64020 PRINT 

645 PRINT “UOQCE CESEUA NOUS PES 
QUISA ? * 

S646 PRINT “ tS Ns 


28 MICROHOBBY 


a 
Asa 
So7a 
5230 


dia 
GIDSI 
cIIa 
7:15 
6120 
TO 


“242 
“<D4S 


Go 


Er 
“230 





IF INKEY$=03" THEN GOTO sk 
IF INKEvY$&=NC THEN GOTO MEN 


Gota Jara 
REM PESOQUIIR DE TELEFONE 


CLS 

PRINT “Qual O NOME 2º 

DIKN N& (tis 

INPUT Ng 

PRINT Ng 

PRINT 

PRINT “RESOBINE à FITA 
PRINT “APERTE O FPiayr DO SRA 
PRINT “DIGITE NEU LINE 

EE ana O “ THEN GOTO 5278 
DIM B$g(220 

LET Zt=" Z: 


LET BC=UIR DLORBD 
IF BC=1i THEN GoOTo asas 

IF BCU<>A THEN GOTO ssa 

FOR I=iâ TO 238 STEP 23 

a B&(1I TO T+141 =Ng THEN Se 


NEXT I 


coTo 6838 
SL OW 


NT 
“NRO FOI ACHADO ESTE 
Ce. 


NT 
PRINT “NOVA PESQUISA (525197 
IF INKEY$="'5S" THEN coTo ses 
IF INKEYg&=ON THEN GOTO MEN 


GoTo sS312 

REM PESQUISA POR Leraa 
LET N=1 

DIM N$(19808) 

CLS 


RAS “NOMES COMECADOS COM 
INPUT L$ 

PRINT Lg 

PRINT 

PRINT “REBOBINE À FITAS 
PRINT “APERTE O PiAay DO GRA 
PRINT “DIGITE NEU LINE“ 


IF dad a 


LET 
DIM Bs (230) 
LET a = a 

LET BO USA PLORD 

IF BC=1i THEN GcoTo sa58e 

IF BC<>2 THEN Goro ssgr 

FOR I=1 TO 238 STEP 28 

à É A =| $& THEM GOSUS Joga 
NEXT 

SOTO Zaas 


THEN coro 7288 


VADOR 


"240 


SL Ot 

PRINT “ERRO="“; BC 

PRINT 

PRINT “APERTE Q STOP DO ERA 
PRINT “DIGITE NEW LINE C-NO 


VA PESQUISAS 
*245 


GOTO área 
LET N$(N TO N+22º 


LET N=N+23 


=R$4(I TO I 


RETURN 

CLS 

SL Ot 

IF N=i THEN Goto cases 
FOR U=i TO N+422 STEP Za 


PRINT N$&(U TO U+422) 
NEXT U 
Goro sosa 


O O O O a. 


96908 PRINT 
“NRO FOI ENCONTRADO N 
E to ado NOME  COMECADO COM ESTA LE 


9618 GOTO 5645 
Figura 10 





A variável Z foi criada e zerada. Nela será armazenado 
o número de bytes lidos, que serão armazenados no 
buffer, após a execução do comando DLOAD.Z$ indica 
o buffer em que serão armazenadas as informações lidas 
na fita. 

Ão ativarmos o comando DLOAD, o computador co- 
loca no buffer a primeira ficha física e por cinco segun- 
dos podemos manusear os dados antes que a outra ficha 
entre no buffer. 

O programa 5 possui três tipos de pesquisa: 

1. Procura o nome cujo telefone você forneceu em T$. 
2. Procura o telefone de um determinado nome, indica- 
do em N$. 

3. Lista os nomes começados com uma determinada le- 
tra, indicada em L$. 

Mas você pode criar outros tipos de pesquisa. Procure 
entender como o comando DLOAD funciona e como é 
feito a pesquisa; depois, deixe livre sua imaginação! 

Cada ficha lógica contém 23 bytes, sendo os 15 pri- 
meiros bytes, reservados para o nome e os outros 8 
bytes, para o telefone. 

Assim, se você deseja saber o telefone de "X”, o com- 
putador separa as fichas lógicas (23 em 23 bytes) e com- 
para os 15 primeiros bytes com o nome que está em N$. 
Se forem iguais, aparece na tela o nome e o respectivo 
telefone; caso contrário, analisa a próxima ficha lógica. 
Se este nome não for encontrado nesta ficha física, ini- 
cia a leitura da próxima ficha física e o mesmo processo 
se repete. 

Caso chegue ao fim do arquivo de dados sem achar o 
nome, aparecerá na tela, O seguinte: 


NRO FOI ACHADO ESTE nNoME NA FITA 


Figura 11 


O mesmo processo é feito para a pesquisa do nome 
cujo telefone você informou em T$. A única diferença é 
que são comparados os oito últimos bytes de cada ficha 
lógica, com o telefone em T$. 

Na pesquisa de nomes começados com uma letra (L$) 
é comparado o primeiro byte de cada ficha lógica com 
L$. Se forem iguais, esta ficha lógica é armazenada em 
um outro buffer N$; caso contrário, analisa a próxima 
ficha lógica. 

Quando o código de reportagem em BC acusar “fim 
de arquivo”, as informações que estão no buffer N$ são 
imprimidos na tela. 

Para completar o seu programa, digite o programa seis 
que é o MENU. 


PROGRAMA 6 


18 REM MEN) 

1a LET MENU =IS 

13 cCLs 

13 PRINT KT 6O.,.5:CMERUT- 

22 PRINT AT B.5;“UOCE DESEJAR.” 
o PRINT AT 18,51. CRIAR FIT 


Snes FT 
14 ,5;:"3. VERIFICAR 
&,5S;“8. FPESFUISRR 
THEN GOTO IBB 
THEN SOTO 208 
TREN GOTO 380 
TREM GUETO 4BR 


23.52. º20 


NT > 
FICHA LOGICR” 
O IF INKEY$=UI" 


INKEY $="2º“ 
LE INMEVG="]"3 
IF INKEV6="48" 
GoToO 78 


IF 


Figura 12 


Agora que você sabe como os comandos de armazena- 
mento e recuperação de dados funcionam, crie outras fi- 
chas lógicas e outros programas-pesquisa. 


Õ 






DISPONÍVEL PARA O SE 

TK, ZX81, CP-200 E NE. 
SOFTWARE E HARDWARE 
EXCLUSIVOS NO BRASIL. 











SOFTWARE HARDWARE 





e SCREEN - 27 rotinas para geren- 
ciar a tela, com funções e efeitos 
sensacionais. Cr$ 14.900,00. 

« DOUBLE - Dobra a velocidade do 
SLOW, sem “Piscar a tela” 

Cr$ 5.500,00. 
e MUSIC - Utiliza a saida MIC do 
seu micro, para a saída de som. 
Necessita amplificador externo. 
Cr$ 4.950,00. 
e QUICK - Carrega, salva e verifica 
programas em fita, com o dobro 
4 da velocidade normal. 
Cr$ 14.500,00. 
e COMPILADOR BASIC - Roda 
seus programas em BASIC, 60 
” vezes s rápido. 
Cr$ 26.100,00. 
e EDITOR/DISASSEMBLER - A lin- 


guagem de uina sob seu co- 
ol mando. Cr$ 24.800,00. 








ELDORADO COMPUTADORES E 
SISTEMAS LTDA. 
Rua Visconde de Pirajá, 351 Ljs. 213/214 


22410 - IPANEMA - RJ - Tel.: (021) 227-0791 
O SOFTWARE NÓS REMETEMOS PARA TODO O BRASIL. 







e K-7 CONTROLLER - Controla o 
motor do gravador automatica- 
mente. Cr$ 16.500,00. 

e RESET - Chave “reset”, 

Cr$ 4.950,00. 

e INVERT - Inversão (com chave) 
da imagem. Cr$ 5.200,00. 

* INTER 200 - Permite que o CP-200 
utilize a TK PRINTER ou outros 
periféricos. Cr$ 16.800,00. 

e JOY-FACE - Conexão para JOY- 
STICK. Cr$ 14.300,00. 

e EXTENSOR - Afasta a expansão 
de memória, evitando os desliga- 
mentos constantes. 

Cr$ 24.750,00. 

e MONITOR - Conexão direta do 
seu micro a qualquer monitor de 
video. Cr$ 24.900,00. 
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Autor: Prof. Wilson José Tucci — Coordenador de Projetos Especiais da Escola Experimental Pueri Domus. 


A AMPULHETA ELETRÔNICA 


Com este programa abrimos a seção RELÓGIOS, on- 
de pretendemos apresentar alguns programas para mar- 
car o tempo no seu Apple; nada melhor do que começar 
com um relógio bem primitivo: a ampulheta (programas 
simulando relógios mais antigos, como o relógio de sol, 
serão bem aceitos pela nossa redação). Com a colabora- 
ção dos leitores iremos evoluindo até os modernos reló- 
gios digital-analógicos. 

Se você nunca viu uma ampulheta, nem mesmo na 
abertura do “Túnel do Tempo”, eis como ela se parece: 





O tempo que a areia leva para passar da parte de cima 
para a parte de baixo, completa um ciclo. 

As primeiras ampulhetas, surgiram no século | depois 
de Cristo, contemporaneamente às clepsidras, ou reló- 
gios de água. Chegou-se a desenvolver ampulhetas bas- 
tante grandes, com ciclos de até uma hora. Nos séculos 
XVI e XVII eram comuns ampulhetas de 15 e 30 minu- 
tos nas igrejas, usadas para marcar o tempo dos sermões. 
Para melhor medir o tempo foram feitas ampulhetas 
com as metades superiores e inferior cilíndricas, de tal 
modo que a altura da areia fosse proporcional ao tempo 
passado, e portanto pudesse haver marcas de minuto em 
minuto, até um máximo de vinte minutos. Muitas am- 
pulhetas tinham um eixo no centro, para que ao fim de 
um ciclo, se pudesse rodá-las e começar de novo. 


O Programa 


Linhas 1180-1230 — Essa parte do programa POK Eeia 
uma subrotina em linguagem de máquina, para simular 
O som da areia caindo. 

Linhas 2560-270 — “Perguntam”' quanto tempo o pro- 
grama deve cronometrar e o local de origem da areia. 
Perceba que para cada tipo de areia há um valor de D e 
X, que serão usados na rotina de som, para produzir 
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sons diferentes para cada tipo de areia. Sinta-se à vonta- 
de para mudar os locais de origem das areias, mudando 
também, conforme necessário, as linhas 280-310. 

Linhas 3360-980 — Formam o loop FOR-NEXT que 
determina o tempo a ser cronometrado. 

Linhas 3990-470 — Controem a ampulheta em si. 

Linhas 4990-620 — Enchem a metade superior com 
areia de cor aleatória. 

Linhas 630-740 — Formam a rotina que tira um grão 
de areia da metade de cima e coloca na metade de baixo. 
Como? Simplesmente pintando o ponto da parte de ci- 
ma de preto e o ponto da parte de baixo da cor anterior. 
As posições dos pontos são lidas através das linhas 670 
e 710. 

Linhas 750-770 — Constituem um loop para passar o 
tempo, de tal forma que cada grão caia em intervalos de 
1 segundo. Para um ajuste fino do tempo, talvez seja 
preciso mudar o valor final deste loop (um valor maior 
tornará a execução mais lenta, enquanto um valor 
menor a tornará mais rápida). O valor 220 funciona bem 
no nosso computador. 

Linhas 780-880 —- Dão a ilusão da areia caindo, 
PLOTando e apagando pontos consecutivos suficiente- 
mente rápido para que eles pareçam estar se movendo. 
Use esta técnica em seus programas. A linha 870 chama 
a subrotina em linguagem de máquina para fazer o som. 
Para cada tipo de areia há um som específico. Se você 
quiser, remova o REM dessa linha para que ela fique: 


870 POKE 768,F + NS: POKE 769,S: CALL 
770:NS = NS + 1 


e então para cada grão que cair, haverá um novo som. 
Linhas 8960-940 — Toca o sininho tantas vezes quanto 
Os minutos que já passaram. 
Linhas 1000-1160 — Formam a areia, isto é, as coor- 
denadas dos pontos que devem ser apagados e pintados 
pela rotina das linhas 630-740. 


TWO-LINERS 


Ainda estamos esperando suas colaborações para apre- 
ciação de nossa redação e posterior publicação. 
Portanto, mãos à obra e enviem seus programas pa- 
ra: MICROHOBBY 
Seção Por Dentro do Apple 
Caixa Postal 60081 


o 


6 REM 44 AMPULHETA 444 
91983 POR DENTRO DO APPLE 


186 TEXT : HOME : CLEAR 

248 GOSUB 1180 

258 INPUT "QUANTOS MINUTOS DEVO 
CRONOMETRAR 7 ";MI 

268 HOME : VTAB 7 

278 PRINT "QUE TIPO DE AREIA DEV 
O USAR 7"; PRINT : PRINT "DE 
SERTO DO (M)OHAVE": PRINT ºD 
ESERTO DE (AJTACAMA":; PRINT 
"DESERTO DE (G)OBI": PRINT * 
DESERTO DO (S)AARA": PRINT : 
PRINT "SUA ESCOLHA 7 ";: GET 
A$: PRINT A$ 

286 IF A$ = "Nº THEND = 25:) 
18 

298 IF AS ="A” THEND=S56:X 
18 

380 IF AS="6º THEND=56;k = 
] 

316 IF AS ="S" THEND = 100:X = 
q 

328 HOME 

338 FOR TP=1 TONI 

Me ER 

358 R=3 

360 7 = INTIMA RNDI1))+1 

378 COLOR= 15 

396 REM CONSTRUIR AMPULHETA 

410 HLIN 13,27 AT 6: HLIN 13,27 AT 
39 

420 VLIN 1,7 AT 43; VLIN 32,39 AT 
13 

438 VLIN 1,7 AT 27; VLIN 32,39 AT 
27 

440 5=14;)]=2) 

450 FORA =1 TO 12 STEPZ: PLOT 
5,A + 7; PLOT S,A + 6: PLOT 
J,A + 19; PLOT J,A + 26:5 = 
S+l;J=J+31; NEITA 

460 5 = 14:J = 21 

476 FORA =12 TO 1 STEP - 2: PLOT 
S,A + 18: PLOT S,A + 19; PLOT 
JA + 6: PLOT J,A + 755 = 5 + 
li) =) +14; NEXTA 

460 REM 

498 REM ENCHER À METADE DE CIMA 

99 REM 

S!8 COLOR= 7 

20 A = 170 = 19:B = 

538 FORK=1T02 

Mo FORJ=CTOB 

598 PLOT J,A 

560 NEITJ 

SO A=A-1 

dB8 NEXT K 
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590 C=C-1B=B+1 

s00 IFA( 6 THEN 626 

616 GOTO 536 

620 HLIN 14,26 AT 38 

638 REN 

540 REM COMECA À MARCAR O TEMPO 

650 REM 

b68 COLOR= 6 

678 READ X,Y 

s80 IF X=6 THEN 900 

698 PLOT X,Y 

788 COLOR= 1 

718 READ X,Y 

720 PLOT X,Y 

7% 1FX=20 THENR=R-1 

748 REM 

758 REM AJUSTA O RELOGIO 

768 REM 

778 FORK = 1 TO 220: NEXT K 

786 REM 

798 REM CAIR DA AREIA 

860 REN 

B10 FOR F = 149 TOR 

828 COLOR= 1 

838 PLOT 26,F 

848 COLOR= 9 

856 PLOT 26,F - 1 

868 NEXT F 

870 POKE 768,D + NS: POKE 769,1): 

CALL 778: REM OPCAO... NS=NS 

“ 

B80 GOTO 640 

898 REM 

986 REM TEMPO QUE JA PASSOU 

910 REM 

920 FORS=1TOTP 

930 PRINT CHR$ (7) 

946 NEXT S 


958 IF S=2 THEN HOME: HTAB 1 
8: PRINT *1 MINUTO": GOTO 97 
b 

760 HOME ; HTAB 17; PRINT TP* MI 


NUTOS" 

976 RESTORE ;NS = O 

988 NEXT TP 

998 END 

1008 REM 

1816 REM DADOS DA ARETA 

1920 REM 

1839 DATA 20,6,28,37,19,6,19,37 
521,6,21,37,20,7,20,36,19,7, 
19,36,21,7,21,36 

1849 DATA 20,8,26,35,18,6,18,37, 
22,6,22,37,20,9,28,34,19,8,1 
9,35,21,8,21,35,21,9,22,3 

1058 DATA 22,7,22,35,22,8,23,37, 
23,6,21,34,21,10,20,33,20,16 
519,34,19,9,18,36,22,9,18,35 


1866 DATA 26,11,17,37,18,7,17,3 
6,17,6,16,37,23,7,20,32,21,1 
1,21,33,22,18,23,36,16,6,24, 
37 

1878 DATA 16,6,18,34,20,12,17,35 
518,8,17,34,17,7,19,33,17,8, 
18,33,24,6,15,37,19,18,16,36 


1986 DATA 16,7,23,35,18,9,19,32, 
23,8,16,35,24,7,24,36,25,6,2 
2,34,21,12,25,37,23,9,22,33 

1998 DATA 19,11,20,31,23,18,23,3 
4,24,8,26,37,22,11,26,36,18, 
19,21,32,22,12,25,36 

1100 DATA 20,13,24,35,21,13,16,3 
4,15,7,15,36,15,6,18,32,15,8 
115,35, 14,6,14,37,24,18,17,3 
3 


LO DATA 14,7,25,35,16,8,24,34 
517,9,18,31,24,9,19,31,19,12 
2, 30,20,14,24,35,25,7,203 

1126 DATA 25,8,14,36,26,6,21,31, 
26,7,25,34,19,13,19,30,20,15 
17 224, 16,24,38, 18, 11,23, 

1138 DATA 17,10,16,33,16,9,15,34 
125,9,14,35,15,9,24,33,22,13 
23 16, 10,20,29,17, 11,25, 

1146 DATA 18,12,26,34,23,11,17,3 
1,24,11,16,32,21,15,21,29,19 
,14,14,34,23,12,26,28 

1156 DATA 23,13,15,33,16,11,23, 
31,22,14,18,30,18,13,25,33,1 
7,13,22,30,22,15,24,32,17,12 
519,29 

1168 DATA 18,14,18,29,26,16,21,2 
8,19,15,19,28,21,16,22,29,18 
515,17,30,26,17,24,31,19,16, 
16,31,21,17,23,30,19,17,28,2 
7,8,6 

[186 REM SOM DA AREIA 

1208 POKE 778,173: POKE 771,48: POKE 
772,192: POKE 773,136: POKE 
74,288; POKE 775,5: POKE 77 
6,286: POKE 777,1 

1218 POKE 778,3: POKE 79,248: POKE 
786,9: POKE 781,282: POKE 78 
2,288; POKE 783,245: POKE 78 
4,174: POKE 785,9; POKE 786, 
3 

1226 POKE 787,76; POKE 788,2: POKE 
789,3: POKE 798,96 


1234 RETURN 
Õ 
Daniel R. Falconer e José Eduardo Moreira 
Professores assistentes do 
Departamento de Computação 


da Escola Pueri Domus. 
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o PULO DO SAPO 


Nos números anteriores já analisamos um jogo inteli- 
gente (TK Xadrez de MICROSOFT); um jogo sério (Si- 
mulador de Vôo — fita brinde de MICROHOBBY); um 
programa-ferramenta (funções | da MICRON) e um apli- 
cativo administrativo (SICOM da MICROSOFT). Este 
mês vamos analisar um jogo de ação: O PULO DO SAPO 
da MULTISOFT. 


TEEFLELELLEILErIrrrIrrrIrrrrrrEI 


PULO Dis 


E E RR ERES 














MULTISOPT 


= a (Cc) -19853 


MULTISÕPT INF. LTDA. 

A fita nos foi enviada numa embalagem bem cuidada, 
contendo instruções de carga e um certificado de garan- 
tia. Já aqui, nos defrontamos com a primeira novidade: 
a fita está garantida por 60 dias “contra defeitos de fa- 
bricação” e por UM ANO, contra “uso indevido ou mau 
funcionamento do equipamento reprodutor mediante 
pagamento de uma taxa de substituição”. 

Se realmente isto funcionar, representa uma louvável 
iniciativa que esperamos seja logo imitada por todos os 
fabricantes brasileiros de SOFTWARE. 

Afinal das contas o tão massacrado consumidor pre- 
cisa começar a levar um pouco de vantagem. 

A qualidade de gravação foi testada aqui, na redação, 
em gravadores de várias marcas e modelos e justificou 
a ousadia de garantia. A gravação (bem uniforme e em 
bom nível) só dá problemas em gravadores com o 
azimuth da cabeça desregulado. Este é um problema que 
ainda esta à espera de uma solução. 

O PULO DO SAPO é um jogo tipo “vídeo-game” que 
pode ser jogado com Joystick. Obviamente não resiste a 
uma comparação direta com cartuchos de vídeo-game 
por três motivos básicos: 

1) No cartucho, o tempo de carga é irrelevante (o cartu- 
cho é uma ROM.). Na fita em questão, o tempo de car- 
ga é de 6 minutos. 

2) A tela do TK é de baixa resolução (pixel muito gran- 
de) para poder permitir figuras “realistas”. 

3) O TK só produz imagens preto e branco. 

Mas, levando-se em conta que o TK é um computador 
(de verdade!) e que esses jogos representam nele, uma 
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utilidade marginal, talvez as objeções anteriores possam 
ser relevadas. 

Nossa opinião começa a se tornar um pouco mais fa- 
vorável quando começamos a jogar: a apresentação está 
em nível profissional e as instruções são bem nítidas (em 
que pese a ausência de acentos!) . 

O conteúdo do jogo é um pouco pobre: um sapo que 
tenta chegar em casa atravessando uma estrada movi- 
mentada e pulando por cima de troncos, tartarugas e ja- 
carés para atravessar um rio. 

Um toque patético é dado pelo esporádico apareci- 
mento de um filhote (ou será um girino?) que o sapo 
precisa salvar. Quando o sapo pega o filhote no colo, o 
símbolo (não dá para se falar em figuras) pisca com um 
rítmo tão bem acertado que chega a evocar algo esper- 
neando! O efeito é gozadíssimo, mostrando que a cria- 
tividade e a imaginação podem muito bem suprir a falta 
de recursos. 

A contagem de pontos e de tempo é impecável e o sa- 
po dispõe, inclusive, de uma galeria de recordes, bem es- 
timulante para o espírito competitivo. 

Quando um jogador escreve seu nome, se o joystick 
estiver conectado, algumas letras não são aceitas. Este 
problema ocorre com alguns modelos antigos do 
TK 82-Ce é de máquina,mas não de fita (aliás já comen- 
tamos, na revista, como o usuário deve proceder para eli- 
minar este inconveniente). 

Em resumo, trata-se de uma fita produzida e fabrica- 
da em nível profissional, contendo um jogo razoavel- 
mente interessante, com pouco conteúdo instrutivo mas 
suficientemente divertido para um dia de chuva ou uma 
reunião de amigos. 


ONCRATULAÇÕES 


VOCE SUPEROU O ATUAL 
RECORDE E QUALIFICOU 
SEU NOME PARA SER 
INCLUIDO NA GALERIA 
| DOS RECORDES DO PULO 
EE DO SAPO: 


(RNDRE 


ENTRE O SEU NOME E: 
PRESSIONE NEUL INE. 
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(N.R.: Todos os fabricantes de SOFTWARE podem nos 
enviar um exemplar de suas fitas, pois teremos o máxi- 
mo prazer em analisá-las e comentá-las para prestar mais 
um serviço a nossos leitores). O 


e 


NOVIDADES 








O 64K de memória RAM 


EO TK 2000HEE 


As principais características deste lançamento da 
Microdigital são: 








O 16K de memória ROM com linguagem BASIC 
(compatível com Apple Soft), Mini-Assembler e Mo- 


nitor/Disassembler. 


O Operação em modo texto ou gráfico de baixa e alta 
resolução (280x192), em cores, sistema PAL-M, 


O Canal de som pela TV, 
O Teclado profissional tipo máquina de escrever. 


Podem ser conectados ao TK2000 até dois gravadores 
cassete com controle por software, em formato Apple- 
Soft ou próprio, e também pode ser conectado inter- 
face para disk-drive de 5 1/4 polegadas. 

Para display de vídeo pode ser utilizado numa TV co- 
mum, em cores ou preto e branco, ou monitor de vídeo. 

A ligação de impressora, tipo Centronics, pode ser 
feita diretamente, sem a necessidade de dispositivos de 
interface adicionais. 


NOVO LIVRO PARA INICIAÇÃO AO 
MICROCOMPUTADOR 


Está sendo lançado no Rio de Janeiro, um novo livro 
que visa difundir a linguagem básica para microcompu- 
tadores, em todo território nacional e nos países de lín- 
gua portuguesa. 

O livro, que serve para adultos e crianças é fruto de 
um método e a experiência de um curso para iniciantes, 
desenvolvido pela MICRO-KIT, tem como autores 
Carlos Alberto Abreu, que possui mestrado em Engenha- 
ria de Sistemas pela COPPE e de Denise Reis, que tam- 
bém possui mestrado em Educação do IESAE, da Fun- 
dação Getúlio Vargas. 

Tendo como base a programação voltada para os mi- 
crocomputadores da linha Sinclair: TK82, 83, 85, 
CP200, TIMEX 1000, ZX 81, entre outros; esse livro po- 
de também ser utilizado pelos operadores da linha TRS 
ou APPLE, com ligeiras modificações. 

Sendo editado no Rio de Janeiro, o livro será distri- 
buído diretamente pela Micro-Kit em sua primeira 
edição. 

PROGRAMAS PARA COMPATIVEIS COM TRS-80 

Foi lançado livro de programas para CP300, CP500, 
D 8000, D 8001, D8002, DGT 100, NAJA, JR.SYSDATA 
de autoria de Jeff Andrew editado pela EB Informática 
(CP. 30234, CEP 1051, SP). 

Os programas varrem toda gama de interesse, indo 
desde aplicativos sérios (conta bancária, demonstrativos 
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Está previsto o lançamento de outros acessórios tais 
como joystick, interface RS232, etc. 

Uma grande quantidade de programas aplicativos co- 
merciais e profissionais, bem como jogos animados em 
cores e alta resolução será lançada. 

Na área de aplicativos comerciais destacam-se: 

1) programa de cálculo de planilhas (tipo Visicalc), 
2) sistema de controle de estoques, 
3) editor de textos para a lingua portuguesa. 


gráficos, etc.) até jogos divertidos. 


A INFORMÁTICA CHEGA ÀS ESCOLAS 
DE 19 E 29 GRAUS 

Crianças e adolescentes de várias escolas particulares 
do 1º e 2º graus, já estão aprendendo a operar em mi- 
crocomputadores pessoais, sendo esse o primeiro passo 
para que, no futuro, eles possam desenvolver-se no pro- 
missor campo da informática. 

O curso, que está sendo ministrado pela CENADIN — 
Centro Nacional do Desenvolvimento da Informática, 
sob a direção do engenheiro Ramiro Yabumoto e Ale- 
xandre L. Werfel, seguem as seguintes fases: Iniciação ao 
Microcomputador — Programação Basic e Introdução ao 
Processamento de Dados. 

Com um corpo de vários professores especializados, 
esta empresa ministra esse curso no próprio colégio, 
onde, em razão do próprio interesse dos pais dos alunos, 
lhes foi cedido um espaço para essa especialização fu- 
tura. 

Colégios de boa categoria, como o Rio Branco, Renas- 
cença, Benjamin Constant, Maria Imaculada entre 
outros, já cederam espaços para que a Cenadin possa ini- 
ciar seus alunos no campo da informática. 

A iniciativa pioneira desta empresa, acha-se em franca 
expansão e apesar da resistência de algumas escolas, o 
engenheiro Alexandre acredita que outros colégios de 
São Paulo irão aderir, uma vez que, o próprio avanço da 
informática irá determinar esse procedimento. 
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CURSO DE ASSEMBLY 


aula 4 


Observação Inicial: Para esclarecimento dos leitores, sa- 
ligntamos que este curso é um resumo do livro “Introdu- 
ção à Linguagem de Máquinas” para o TK” — AS- 
SEMBLY Z80”, Volume | de Flávio Rossini (Editora 
Moderna e Micromega). Para os que desejarem se apro- 
fundar no ASSEMBLY ZBQ, sugerimos a leitura do livro 
citado e sua continuação (Volume ||). 


PRINCIPAIS REGISTROS INTERNOS DE 8 BITS 


Iniciaremos esta aula explorando o conceito de RE- 
GISTRO; esta palavra já foi utilizada quando falamos so- 
bre a memória. Um registro é um circuito eletrônico ca- 
paz de memorizar bits (oito no nosso caso), podendo re- 
presentar e armazenar números de O a 255 ('00' a 'FF' 
em hexadecimal). 

O microprocessador do TK possui vários registros in- 
ternos que são muito utilizados nos programas em lin- 
guagem de máquina, dos quais sete serão estudados nes- 
sa aula; estes registros “não” fazem parte da memória e 
são chamados respectivamente de À, B, C, D, E HeL., 
Alguns deles têm a propriedade de “juntarem-se” quan- 
do necessário, formando um único registro de 16 bits; 


MICRO REI 


INFORMÁTICA LTDA. 
















— Cursos regulares de Linguagem BASIC ou com 

horário a combinar, para executivos e para 
ualquer microcomputador. | 

am Curso sobre GRÁFICOS em Basic, para JR, 
DISMAC. | 

— Venda de micros pelo correio: JR, MAXXL. 

— Transformamos televisão para monitor. 

— Consultoria em SOFTWARE para 
microcomputadores. 

— Especializada em programas para Hewlett Packard 
85. 

7 da 

— Programas prontos para HP 85 e8B R 

e Mala direta e agenda de clientes * Movimentação 

bancária com código de despesas * Datilografia 

automática de circulares com busca de endereços na 

fita e Topografia * Contabilidade de autônomo: livro 

caixa * Jogos diversos * Folha de pagamento 

e Controle de estoques * Controle para Postos de 

gasolina * Controle de processos para Marcas e 

Patentes * Controle de aluguéis * Contas a pagar 


e Contas a receber 


Rua Pinheiros, 812 


CIT As 


Pinheiros - SP 
Tel.: (0171) 881-0022 
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Flavio Rossini 


assim podemos formar os pares de registros BC, DE e 
HL (só estes pares são possíveis). 

Por exemplo, se o registro B contém o número 'AQ 
(160 em decimal) e o registro C contém 'B2' (178 em 
decimal): o par BC contém o número 'AGB2' (256 x 
x 160 + 178 = 41138 em decimal). 


up 
LER 
NM 
LH RR 


(Como podem ser imaginados os principais registros intemos do 
microprocessador | 


Como vimos anteriormente, as instruções em lingua- 
gem de máquina são dadas por um ou mais grupos de 
códigos em hexadecimal de dois dígitos cada. Isto é fei- 
to para evitar a confusão que poderia ser criada usando 
apenas os números O e 1. Mesmo assim, temos agora 
apenas 16 símbolos disponíveis (6, 1,2,3,4,5,6,7,8, 
9, A, B, C, D, E, F) e para programas razoavelmente 
grandes mesmo isto pode trazer confusão! Dessa forma, 
para facilitar a compreensão do ponto de vista humano, 
costuma-se associar a cada instrução, grupos de letras em 
forma MNEMÔNICA para auxiliar a programação, que 
são chamados “códigos de operação”, pois terão como 
objeto associar uma ORDEM a cada grupo de letras! Por 
exemplo, se o código 10100111 significar “some”, seu 
correspondente em hexadecimal seria 'A7' e seu mnemô- 
nico poderia ser ADD. Assim, dependendo da instrução 
em linguagem de máquina, cada mnemônico poderá 
significar 1 ou mais grupos de 2 dígitos hexadecimais. 
Dessa maneira, para programar em linguagem de máqui- 
na, deveremos aprender os mnemônicos correspondentes 
a cada instrução do microprocessador e fazer o progra- 
ma utilizando os mesmos; no final com o auxílio de uma 
tabela, substituiremos os mnemônicos por seus códigos 
hexadecimais e utilizaremos o HEXAMEM para colocar 
o programa em bits no computador. 

No TK os programas em linguagem de máquina são 
tratados como SUBROTINAS de um programa em 
BASIC, as quais são chamadas pela função USR (em 
BASIC, abreviação de USER) cujo argumento é o ende- 
reço inicial da subrotina (por exemplo 30000 se o pro- 
grama de linguagem de máquina estiver a partir do ende- 
reço que colocamos em RAMTOP em aulas anteriores); 
portanto, estas subrotinas devem ter como instrução fi- 
nal um comando para voltar ao BASIC, similar ao 
RETURN, cujo código hexadecimal e mnemônico são 
respectivamente: 

'C9" (código) RET (mnemônico abreviação 
de RETURN) 


SE as” 


Vamos entender como funciona a instrução USR; su- 
ponhamos que tivéssemos o seguinte “programa” em 
BASIC: 

10 PRINT USR 30000 (USR está na tecla L do TK) 

Ao encontrar USR 30000, o computador “carrega” o 
par de registros BC (mencionados anteriormente) com 
este número, ou seja, como 30000 = '7536', teremos 
B = '75' e C= '30'. A seguir o microprocessador exe- 
cuta o programa em linguagem de máquina que começa 
na memória 30000 (= '7536'); portanto é conveniente 
que tenha sido previamente colocado um programa a 
partir da memória 30000. O programa é então executa- 
do até encontrar a instrução RET (código 'C9') quando 
o controle volta ao programa BASIC, fornecendo como 
saída o conteúdo do par BC, que, se não for alterado du- 
rante o programa em linguagem de máquina, continuará 
sendo '75360' (30000). Portanto, para obter a saída da 
subrotina (ou seja, os resultados que devem estar no par 
BC) basta ordenar um PRINT da função USR! 

Vamos então colocar o seguinte programa em lingua- 
gem de máquina na memória 30000: (que já deve estar 
reservada!) 


RET (apenas isto!) 


Como se trata apenas de uma instrução, não precisa- 
mos utilizar o programa HEXAMEM; iremos fazê-lo di- 
retamente com POKE. O código hexadecimal do RET é 
'C9" que equivale a 201 (em decimal), portanto: 


POKE 30000, 201 (NEW LINE) 
A seguir digite: 
PRINT USR 30000 (NEW LINE) 


O que deverá aparecer na tela? Ora, a função USR 
carregará o par BC com 30000 ('7530'), ordenando a se- 
guir, que o microprocessador execute o programa em 
linguagem de máquina que está a partir da memória 
30000, encontrando "de cara” o RET. Dessa forma, o 
controle voltará ao programa em BASIC, sem ter altera- 
do os registros BC e fornecerá como saída, o próprio 
30090; portanto, na tela de TV deverá aparecer o núme- 
ro 

Poderia surgir agora a seguinte pergunta: mas não 
existe uma instrução equivalente ao STOP? De fato, há 
em linguagem de máquina, uma instrução similar ao 
STOP em BASIC cujo código de operação é HALT (có- 
digo hexadecimal '*76'). NUNCA use esta instrução pois, 
neste computador, ela paralisa o sistema e este não acei- 
ta mais nenhuma tecla nem mesmo o BREAK! Portan- 
to, use sempre RET para terminar seus programas em 
linguagem de máquina. 


A INSTRUÇÃO LD 


A instrução LD permite colocar números dentro dos 
registros internos do microprocessador (obviamente es- 
tes números poderão ser de '00' a 'FF' no máximo para 
cada registro), copiar os dados de um registro em outro 


Venha visitar nosso 


SHOW ROOM. 
E conhecer 
os últimos modelos 


ROBINSON'S 


A LOJA QUE TEM SOM ATÉ NO NOME 


Rua Santa Ifigênia, 269 - Fones: 221-6621/8880 - SP 
Rua Humaitá, 484 - Fone: 21-3338-S.J. dos Campos 


ou para algum endereço da memória e vice-versa; assim, 
existirão várias instruções LD, cada uma com seu pró- 
prio código hexadecimal. (LD é abreviatura de LOAD = 
= carregue). 

Vamos analisar inicialmente, como colocar números 
diretamente nos vários registros; a instrução, de modo 
genérico, corresponde a: 


LD registro,dado 
Por exemplo: 
LD E, '2A' (que equivale a dizer LD E,42) 


Colocará o número '2A' (42) no registro E. Esta ins- 
trução corresponde a 2 (dois) bytes em código hexade- 
cimal, um para o código de operação (no caso “car- 
regue” o registro E: LD E,) e o outro para o dado 
número que será colocado. Assim, para os vários regis- 
tros, teremos os seguintes códigos de operação e códigos 
hexadecimais: 


INSTRUÇÃO] cônico 





(a instrução LD registro dado (8 bits).) 
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Vamos então fazer um programa, que "carrega" o re- 
gistro B com '00' e o registro C com '2A': 





Devemos então colocá-lo, por exemplo, a partir da 
memória 30000 (lembre-se de reservá-la), usando 5 vezes 
POKE como fizemos anteriormente para a instrução 
RET (transformando adequadamente os códigos hexade- 
cimais para decimais) ou então usando o programa 
HEXAMEM para introduzir as 3 instruções. Se você uti- 
lizar o HEXAMEM, lembre-se de RESERVAR o fim da 
memória antes de colocá-lo no computador; a seguir, 
execute-o colocando 30000 para o endereço inicial e fa- 
ça: (N.L. = NEW LINE) 


co 


0600 (N. 
GEZA (N, 

(N. 
P (N. 


Eu qe qa 


) 
) 
) 
) 


Note que o programa ocupa 5 posições de memória, 
respectivamente de 30000 a 30004. 


30009 06 

LD B, 00º 
30991 00 
30002 E 

LD C, '“2A' 
30063 “ZA 
30004 ca RET 
30095 


(visualização do programa na memória do computador) 


O 
MICROCOMPUTADOR 
PA 
PEQUENA EMPRESA 


CARLOS LAGROTTA FILHO 


Caixa Postal 343 
13870 - São João da Boa Vista - SP 
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A seguir ditite: 


PRINT USR 30000 (N.L.) 

O que deverá aparecer na tela? O conteúdo do par de 
registros BC, ou seja, 256 x ( + 42 = 42. Isto porque o 
par de registros foi alterado antes da instrução RET; 
assim seu conteúdo inicial que era BC = 30000 (7536) 
foi modificado pelo programa para BC = 42 ('OM2A'). 

Há também a possibilidade de carregar diretamente 
pares de registros; neste caso porém, cada instrução cor- 
responderá a 3 bytes, 1 para o código de operação e 2 
para o número que deverá ter 16 bits. Note que, como já 
foi comentado anteriormente, você deverá colocar antes 
SEMPRE O BYTE MENOS SIGNIFICATIVO: assim 
temos as seguintes instruções: 


LO BC, dado 161 + 2 bytes para o dado 
LD DE, dado 11 + 2 bytes pars o dado 
LD HL, dado '2Y + 2 bytes para o dado 









(a instrução LD par de registros, dado (16 bits).) 


E façamos o programa: 





MEM. 30002 RET 'C9 


(veja n9 4 ou nº extra-promocional) 


Usando HEXAMEM, coloque o programa a partir da 
memória 30000. Verifique que fazendo PRINT USR 
30000 você obterá 160 (Por quê?). Você não precisa 
preocupar-se em “apagar” o programa anterior, pois es- 
tará escrevendo “por cima”' nas mesmas memórias. 

Experimente “esquecer” de inventar os bytes confor- 
me indicado e introduza este programa: 


O que você irá obter? Tente explicar o resultado. 

Vamos ver agora, como passar números de um regis- 
tro para o outro; teremos todas as combinações pos- 
síveis da seguinte instrução genérica: 


LD registro, registro, 


a qual copia o conteúdo do registro da DIREITA no re- 
gistro da ESQUERDA, não alterando o conteúdo do re- 
gistro da direita; esta instrução equivale a apenas 1 byte 
em código hexadecimal pois não exige que nenhum da- 
do seja explicitado. Para facilitar, iremos construir uma 
tabela que possui todas as combinações possíveis desta 


instrução: 
toJaJejcJo[EJu/i 
A [e [78 | 9 | 74º | 8: | 0 |O! 







Para utilizá-la, use sempre primeiro a coluna vertical 


. 


à esquerda e, a seguir, a linha horizontal superior; por 


exemplo: 

LD C,D equivale a '4A" (copie o conteúdo do registro 
D no registro C, sem alterar o 
registro D). 

LD E,E equivale a '5B' (copie o conteúdo do registro 


E no registro E. Como você 
pode notar esta instrução não 
faz absolutamente nada!). 
Experimente agora o seguinte programa, que copia o 
conteúdo dos registros H e E, previamente carregados, 
nos registros B e C respectivamente: (lembre-se que, por 
enquanto, iremos fazer sempre MEMÓRIA INICIAL = 
= 30000 e que o final de memória deve estar reservada 
antes de colocar HEXAMEM no computador). 
MEM. 30006 LD H,'01º “2601 ; 


MEM. 30092 LD E, '50' 1ESG' ; 
MEM. 30004 LDBH “44º 


MEM. 30005 LDC,E  “4B' 
MEM. 30006 RET 'Ca" 





Utilize então HEXAMEM para colocar os códigos do 
programa na memória e, no final, ao invés de teclar P 
(pare), tecle XS (eXecute em Slow) ou XF (eXecute em 
Fast) para que o programa seja executado. Naturalmente 
se você prefere continuar fazendo PRINT USR 30000 
não há problemas. 

Perceba que este programa “carrega” o registro H 
com '01' e o registro E com '5G' (84 em decimal) e, a se- 
guir, copia o registro H em Be registro E em C, fazen- 
do BC = '0150'. Desse modo, você poderá obter 1* 256 + 
+ BO = 336. 








NÃO PERCA TEM- 
PO! SOLICITE 
INFORMAÇÕES 
AINDA HOJE! 











GRÁTIS 


COMPUTAÇÃO 
ELETRÔNICA ! 


NO MAIS COMPLETO CURSO DE ELETRÔNICA DIGITAL E MICRO- 
PROCESSADORES VOCÊ VAI APRENDER A MONTAR, PROGRAMAR 
E OPERAR UM COMPUTADOR. 


MAIS DE 160 APOSTILAS LHE ENSINARÃO COMO FUNCIONAM OS, 
REVOLUCIONÁRIOS CHIPS 8080, 8085, Z80, AS COMPACTAS “ME- 
MORIAS"E COMO SÃO PROGRAMADOS OS MODERNOS COMPU. 
TADORES. 


VOCÊ RECEBERA KITS QUE LHE PERMITIRÃO MONTAR DIVERSOS 
APARELHOS CULMINANDO COM UM MODERNO MICRO-COMPU- 
TADOR. 


CURSO POR CORRESPONDÊNCIA 


CEMI — CENTRO DE ESTUDOS DE MICROELETRÔNICA E INFORMÁTICA 
Av. Paes de Barros, 411, cj. 26 — Fone (011) 93-0619 
Caixa Postal 13.219 — CEP 01000 — São Paulo — SP 





(NOTA: NÃO existe instrução para copiar de uma só 
vez números de 1 par de registros para outro; assim, por 
exemplo, a instrução LD BC, HL não é válida e deve ser 
substituída por: 


LDBH e LDCL 


Além disso, NÃO é possível tentar copiar o con- 
teúdo de um registro para um par ou vice-versa; portan- 
to, instruções do tipo: 


LD BC,A 
LD D,HL 


A título de esclarecimento, podemos agora fazer uma 
analogia com o BASIC; a instrução LD registro, dado de 
1 byte ou LD par de registros, dado de 2 bytes pode ser 
associada à instrução LET variável = número, por exem- 
plo, LD B, “10' com LET X = 16. A instrução LD regis- 
tro, registro pode ser associada a LET variável = variá- 
vel, por exemplo, LD H,L com LET X = Y. 

É conveniente lembrar que ao chamar uma subrotina 
em linguagem de máquina, apenas o conteúdo dos regis- 
tros B e C é conhecido; todos os demais têm um con- 
teúdo desconhecido. O mesmo é válido para a memória 
que fica após o programa. Vamos exemplificar: ao fazer 
RAMTOP = 30000, reservamos a memória de 30000 a 
32767. Se tivermos um programa que ocupa 166 bytes, 
ou seja, da memória 30000 à memória 30099, as posi- 
ções de 30100 a 32767 terão valores “quaisquer”. É nes- 
ta região de memória APÓS o programa em linguagem 
de máquina que colocaremos as variáveis do nosso pro- 
grama que não “couberem” nos registros. O 


não existem! 
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OS OITENTA 





Um dos recursos mais interessantes de um compu- 
tador é sua capacidade de manipulação de texto. Ou se- 
ja, juntar, separar, quebrar e classificar strings (cadeias). 
Isso permite usar o computador e sua impressora como 
uma máquina de escrever “inteligente”. 

Programas com esta finalidade, são chamados de “edi- 
tores” ou “processadores de texto” e atualmente, são 
bastante usados em jornais para facilitar os trabalhos de 
diagramação, revisão e redação de artigos. 

Em algumas revistas especializadas têm aparecido 
muitos programas que realizam uma ou outra função de 
manipulação de strings, principalmente para compu- 
tadores compatíveis com o TRS-80 e o Apple Il. 

Se você tem um TK-82 e viu algum destes programas, 
deve ter pensado: “Interessante . . . mas como eu pode- 
rei fazer o mesmo no meu computador?" 





Um editor de cartas 





Mudando um pouco o enfoque dado em artigos ante- 
riores, mostraremos um programa destinado a outros 
computadores e depois de explicarmos detalhadamente 
seu funcionamento, descreveremos como você poderá 
implementar um programa semelhante em seu TK. 

Este programa (veja listagem) tem a finalidade de co- 
locar um texto de uma correspondência num formato 
de carta padrão. O texto deverá entrar linha por linha, 
poderá ser corrigido em qualquer momento de sua di- 
gitação — sendo impresso após a digitação da última 
linha, limpo e sem erros, já que eles foram eliminados no 
processo de escrita. Foi desenvolvido em BASIC padrão, 
podendo ser rodado na maioria dos computadores, me- 
diante adaptações à sua respectiva versão do BASIC (por 
exemplo, o Apple Il eo TRS-80 e seus similares). 
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E >>> 


UM EDITOR DE CARTAS 


Igor Sartori 


10 * EDITOR DE CARTAS 

29 CLEAR 2040 

38 DIM AS(109) 

40 INPUT "QUAL O NUMERO MAXIMO DE CARACTERES";N 

S6 INPUT “NOME DO AUTOR DA CARTA";NS$ 

60 INPUT "DATA (POR EXTENSO) ";DS 

70 INPUT “CIDADE DO AUTOR DA CARTA ";LS 

86 INPUT “NOME DO DESTINATARIO ";D1S 

90 INPUT * ENDERECO (Rua e numero) DO DESTINATARIO ";ES 

1909 INPUT “CEP, O NOME DA CIDADE, O ESTADO DO DESTINATARIO (EM UMA UNI 
CA LINHA) ";T1S 

110 INPUT “DIGITE 'Prezado(a) Sr(a.) PRIMERO NOME DO DESTIMATARIO'“;AL 


8 
120 PRINT CHR$(31) 
130 PRINTCINSTRUCOES" 
140 PRINT “INTRODUZA AS LINHAS UMA A UMA." 
159 PRINT "SE OCORRER UM ERKO EM UMA DELAS, ELA PODERA SER" 
166 PRINT “SER CORRIGIDA DIGITANDO-SE '4'* E SEU RESPECTIVO NUMERO" 
170 PRINTCDIGITE 'FIM' PARA PARAR" 
180 FOR X=1 TO 106 
190 Z=x 
290 PRINT “1º;x 
216 INPUT AS(X) 
220 IFP LEFTS(AS(X),1)="0" THEN 459 
236 IF AS(X)="FIM" THEN PRINT CHR$(31):GOTO 269 
240 IF LEN(AS(Z)) > 4 THEN PRINT “LINHA MUITO GRANDE" :Y=Z:XeX+L:Cels;M= 
P:GoTO 478 
250 MEXT X:X=X-1 
268 PRINT TAB(S);L5;",";DS 
270 PRINT:PRINT:PRINT:PRINT 
280 PRINT TAB(5);DIS 
290 PRINT TAB(5S);ES 
300 PRINT TAB(S);TIS 
316 PRINT 
320 PRINT TAB(S);AIS;":" 
330 PRINT 
340 FOR B=1 TO X-1 
35€ PRINT TAB(5S);AS(B) 
360 NEXT B 
376 C=23+B 
369 PRINT 
390 PRINT 
496 PRINT TAB(55);"Atenciosamente” 
410 PRINT 
420 PRINT 
430 PRINT TAB(55);nS 
END 


450 * ROTINA DE CORRECAO 

460 YT=VAL(RIGHTS(AS(X), LEN(AS(X))=1)) 

470 INPUT “SELECAO; 1) INTRODUZIR NOVAMENTE A LINHA 2) CORRECAO";A 

400 IP A<l OR A>2 THEN 470 

490 ON A GOTO 590,520 

500 AS(Y)="":INPUT AS(Y) 

> Pa LEN(AS(Y))<=M OR AS(Y)="" THEN GOTO 250 ELSE LET E=Y:GOoTO 


24 
520 T=LEN(AS(Y)) 
539 C=1 
540 LET M=0 
550 QS-INKEYS 
560 IP QS=" " THEN IP C>T THEN GOTO 556 ELSE LET M=M+13C=C+1:18=MIDS( 
AS(Y),M,L):PRINT IS; 
Edo diad AND C<=T THEM AS(Y)= LEFTS(AS(Y),C-1)+ RIGHTS (AS(Y),LEM 
( Y)1-C) 


580 IF Q8="1" THEN INPUT ISIAS(T)TLEPTS(AS(T) ,C-1)+JS+RIGHTS(AS(Y),L 
EN(AS(Y))-C+1) 

590 IF QS="E” THEN IF LEN (AS(Y))<=N THEN PRINT :sPRINT AS(Y) :AS(X)=* 
*3XºX-1:GOTO 250:ELSE LET X=X-L:Cel:MeG:Z=Y:PRINT:PRINT AS(Y) :GOTO 248 
690 IF LO THEN PRINT RIGHTS(AS (Y), (LEN(AS(Y))-C+1)) :Col:Meg 

610 1F ="Bº THEN PRINT CHR$(18);:LET MaM-1:CeC-) 

629 Goto 558 








FUNCIONAMENTO 


O programa editor de cartas está dividido em quatro 
partes: introdução dos dados do autor da carta e do des- 
tinatário, introdução do texto da carta, correção dos 
possíveis erros e impressão da carta. 

Na primeira parte, que compreende as linhas de 10 a 
120, reserva-se inicialmente um espaço na memória para 
o texto da carta, por meio das instruções CLEAR 2000 
e DIM A$(100). A instrução CLEAR 2000 reserva 2000 
bytes da memória para strings e a instrução DIM A$(100) 
dimensiona um vetor de 100 posições de memória, que 
conterá o texto da carta. Desta forma, poderemos escre- 
ver uma carta com no máximo 100 linhas ou 2000 letras 
(cerca de 200 a 300 palavras), o que é suficiente para 
um bom “bate-papo”. 

A seguir, dimensiona-se o número máximo de caracte- 
res por linha. Isso será função do tamanho do papel dis- 
ponível e do tamanho da margem direita e esquerda. No 
programa, a margem esquerda foi fixada em b espaços, 
ficando a margem direita a critério do usuário. 

A seguir são pedidos os dados do autor da carta e do 
destinatário. Na linha 100 pede-se o CEP, a cidade e o 
Estado do Destinatário. Estes dados deverão ser digita- 
dos em uma única linha, separados por um espaço. 

Uma vez digitados todos os dados, a tela é limpa, por 
meio da instrução PRINT CHR$(31). Isso prepara a tela 
do computador para a introdução do texto da carta. 


A INTRODUÇÃO DO TEXTO 


No momento da introdução do texto, o programa 
mostra na tela uma série de instruções destinadas a ex- 
plicar como proceder. 

A seguir, o computador mostra o símbolo “4” segui- 
do pelo número 1. Isso indica que você deve digitar a 
primeira linha de seu texto. Quando terminar de digitá- 
la, pressione a tecla ENTER, NEW LINE ou equivalente. 
Se a linha for muito grande, o programa entra automati- 
camente no modo de correção, exibindo a mensagem: 


LINHA MUITO GRANDE 


Se, por outro lado, o número de caracteres digitados 
for menor que aquele estabelecido no início do progra- 
ma, o computador exibirá novamente o símbolo “4”, 
seguido pelo número 2, indicando que devemos digi- 
tar a próxima linha, e assim sucessivamente, até que seja 
digitada a palavra FIM, com todos os caracteres em 
maiúsculas, ou quando o número de linhas exceder a 
100 — limite estabelecido pelo programa. 

Neste momento o programa passa para o modo “im- 
pressão”, limpando a tela e imprimindo o texto no for- 
mulário, segundo a formatação pré-estabelecida pelo 
programa. 


O MODO DE CORREÇÃO 


Em qualquer momento da digitação, podemos entrar 


no modo de correção para corrigir um erro que porven- 
tura tenha sido cometido ou se simplesmente desejarmos 
ver uma linha qualquer, já digitada anteriormente. 

Para entrar no modo de correção, devemos pressionar 
a tecla ENTER na linha que estivermos digitando. Quan- 
do o computador mostrar o símbolo de “4” seguido pe- 
lo número da próxima linha, devemos digitar o símbolo 
"4" seguido pelo número da linha que desejarmos — que 
pode ser qualquer uma —, inclusive a última linha digi- 
tada. 

Uma vez feito isso, o computador nos apresenta duas 
possibilidades de escolha: digitar novamente a linha ou 
corrigí-la. 

Se escolhermos a primeira opção, basta, após indicar a 
escolha ao computador, digitar a linha novamente, lem- 
brando-se que existe um limite ao número máximo de 
caracteres. 

Na segunda opção teremos à nossa disposição, vários 
caracteres auxiliares com funções de correção: 

Espaço — a tecla de espaço permite, ao ser pressionada, 
mostrar a linha caractere por caractere. 

L — a letra L maiúscula permite visualizar-se a linha to- 
da na tela. 

B — tem a função de backspace, ou seja, retorna o cur- 
sor sem apagar o caractere mostrado no vídeo. 

D — apaga o caractere imediatamente à direita. 

| — permite a inclusão, em qualquer ponto da linha de 
vários caracteres. Uma vez digitado o caractere “|”, os 
caracteres usados como comando, passarão a atuar como 
caracteres normais. 

E — volta ao modo de introdução de linhas, na mesma 
linha onde foi abandonado. 

Sempre que a linha estiver muito grande, o compu- 
tador avisará, exibindo uma mensagem e retornando ao 
modo de correção. 


POSSIBILIDADES DE 
MUDANÇAS 


Este programa poderá ser modificado de acordo com 
as suas necessidades e sua imaginação. Por exemplo, po- 
demos eliminar as linhas relativas à correspondência e 
torná-lo mais geral. Poderemos, ainda, tentar transfor- 
mar a rotina de verificação do tamanho da linha (linha 
240) em uma rotina que, além de verificar o tamanho da 
linha digitada, “quebra” o seu texto, transferindo os ca- 
racteres excedentes para a linha posterior. 

As modificações mais interessantes, no entanto, são as 

que tornam este programa compatível com o TK. Mos- 
traremos, na próxima parte, um conjunto de dicas para 
traduzirmos este programa para o seu computador. Estas 
dicas são interessantes mesmo para quem não vá fazer 
um programa de edição de cartas, pois elas valem para 
vários outros programas. 
Nota: A listagem que mostramos não imprime o texto, 
mas mostra-o na tela. Isso é conveniente na fase de 
debug, quando eliminamos os erros de lógica e de digita- 
ção, pois evita-se o gasto de papel desnecessário. Uma 
vez corrigido o texto, mude as instruções PRINT das 
linhas 260 à 430 para LPRINT. 
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q = na 


RESPOSTA DO QUEBRA-CABEÇA 








Dentre as muitas respostas que recebemos de nossos 
leitores do Quebra-Cabeça “Motoqueiro no Deserto” en- 
contramos, mais uma vez, a de Samuel Ejchel. 

Desta vez, porém, ela nos chegou às mãos a tempo de 
ser escolhida para publicação. Isso pela clareza e simpli- 
cidade com que ele abordou e resolveu o problema. 

Recebemos muitas outras respostas de nossos assinan- 
tes, porém estavam corretas apenas as enviadas por 


André B. Hartmann 
Antonio Cesar Lettieri 
Álbio Bóing. 

Marcos Antonio Pichateber 


O Quebra-Cabeça da revista nº 3 admite muitas solu- 
ções ou instruções equivalentes, que conduzem sempre a 
uma distância máxima de 275 km. 

O itinerário na condição da solução ótima, pode ser 
decomposto em 3 trechos: 

1. O último, que o motoqueiro percorre apenas duas ve- 
zes, uma indo outra voltando. Para ser máximo, ele deve 
partir com tanque totalmente cheio e caminhar 150 km 
para frente e em seguida retornar. 

2. Como existe combustível disponível para 900 kme o 
tanque da moto leva o equivalente a 300 km, haverá um 
primeiro trecho que, no mínimo, deverá ser percorrido 
6 vezes, 3 indo e 3 voltando. Isto porque 900:300 = 3. 

Para otimizar, este trecho deve ser o mais curto pos- 
sível. 

3. No segundo trecho, que liga o fim do 1º com o início 
do último, deve-se levar e deixar combustível suficiente 
para os 300 km do último trecho. Como a capacidade 
total do tanque é equivalente a 300 km não será possível 
fazer isso em menos que 2 etapas, ou seja, a moto deverá 
percorrer o segundo trecho no mínimo 4 vezes, duas 
indo e duas voltando. Como no primeiro a moto percor- 
re 6 vezes e neste só 4, devemos fazer este trecho o mais 
comprido possível, em detrimento do primeiro, ou seja, 
a moto deve sempre partir com o tanque cheio e cami- 
nhar a maior distância possível, deixando sobrar no fim 
o equivalente a 150 km por etapa. Assim este trecho de- 
verá ter 75 km de forma que a moto sai com o equiva- 
lente a 300 km (tanque cheio), viaja 75km, deixa O 
equivalente a 150 kn:, e retorna consumindo o equiva- 
lente a 7/5 km restantes no tanque. O consumo total nes- 
te trecho será também do equivalente a 300km 
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MENSA 


a International 


Motoqueiro no Deserto 


Samuel Ejchel. 


(4 x 7b km). 

4. Finalmente, para o primeiro trecho, resta combust í- 
vel equivalente a 300 km, ou seja, 900 iniciais menos 
300 consumidos no 2º trecho e menos 300 consumidos 
no último. Ora, como ele é percorrido 6 vezes, sua ex- 
tensão será de 50 km (300:6). Com isso a distância má- 
xima atingida pela moto seria 50 + 75 + 150 = 275 km. 
O. Entre as várias alternativas possíveis de programa, a 
mais simples parece-nos a seguinte: 


lê ENCHA O TANQUE NA DLceIS. 

2Q PENETRE Se KM NO DESERTO. 

Sê FACA UM FESERVATOSRIO Cos 
COMBUSTIVEL PRRR Zee KM. 

tQ RETORNE PARA A BLOCIR. 

Sê REPITA da INATAQRUCOSS IX q 
ta MAIS tMO VEZ, 

2 ENCHA O TBNQUE NO gi cecIS 
FELA TERCEIRA VEZ. 

?à PENETRE NO DESERTO nTES 
BT INGIR Oda RESERUBTORIOS 
A SR KH DR BLOEIS. 

SR COMPLETE OQ TANQUE DA HoOTO 
RET IRBNDO  COMBUITIVEL CE 
Um DOS RESESUATORIOS. 

Sa fio Ram MNBIS 75 KM NO DE- 

ige FRCS UM  RESERVATOSIO Com 
COMIUSITIVEL PRRO ISA KM. 

1l1iW RETORNE DTE QS RESESUATO- 
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Nos próximos dias 17 a 23 de outubro, São Paulo será 
palco de um grandioso evento organizado pela Guaselli e 
SUCESU, contando com o apoio da ABICOMP: O 
INFORMÁTICA/83. 

Este evento, a nível internacional, conta com a reali- 
zação de dois acontecimentos importantes, ou seja: a |l| 
Feira Internacional de Informática e o XVI Congresso 
Nacional de Informática, ambos acontecendo paralela- 
mente um ao outro. 

Este evento é de tão grande importância que, juntos, 
são considerados o terceiro maior acontecimento no 
mundo, na área de Informática, igualando-se ou, supe- 
rando até, o NCC nos EUA e o SICOB na França. 

A programação do INFORMÁTICA/83, foi estrutura- 
da toda ela na preocupação em atingir não somente aos 
profissionais e fabricantes do setor, mas também ao jo- 
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vem e a criança — que serão os “amantes da informática 
no futuro” —, como também aos leigos, ou seja, aqueles 
que não possuem um conhecimento mais aprofundado 
da área. “Uma oportunidade para que todos aqueles que 
se interessam pelo fantástico mundo da informática, te- 
nham acesso às informações básicas" — esclareceu Salva- 
dor Perroti, presidente do Evento INFO/83. 

Esta programação terá uma movimentação calculada 
em cerca de 200 mil pessoas, conforme expôs o presi- 
dente do Evento (Salvador Perroti) —, com uma área 
ocupada, na Feira, de cerca de 23 mil metros quadrados, 
sendo que 19 mil será ocupada por expositores (mais 
ou menos 70 por cento constituída de equipamentos fa- 
bricados no Brasil, de empresas com desenvolvimento 
e tecnologia próprios); dois mil metros ocupados por 
universidades brasileiras e mil por entidades e institui- 
ções governamentais. 

Assim sendo, na opinião do presidente da Feira José 
Roberto Faria Lima, “a grande vedete deste evento, será 
a presença marcante da tecnologia nacional, e, “na fei- 
a”, (acrescentou José Roberto), “será a área de micros, 
pois esta é a área mais próxima do grande público — a 
área de contato da informática com o público que hoje 
existe no Brasil”. 


A Feira: 


A 1 Feira Internacional de Informática na realidade, 
será a “chamariz” para toda a programação do evento. 
Com inúmeras atrações: atividades que incluem debates 
para universitários, para o grande público e para empre- 
sários e profissionais de informática, abordando temas 
centrados no universo da informática, não só a nível de 
desenvolvimento da área como avaliação da tecnologia 
adotada pelo Brasil; além de temas referentes a política 
nacional de software e também referente às preocupa- 
ções de todos com a regulamentação da profissão e o 
sindicalismo na área; finalizando esta série de debates na 
feira, estará presente a preocupação com a análise da 
presença do Estado na economia da área de informática. 

Além destes debates haverá também um circo monta- 
do especialmente para as crianças, onde estas poderão 
tomar contato com os micros que estarão no picadeiro 
do circo, através de orientadoras e pedagogos especial- 
mente treinados para “brincar” com as crianças e o com- 
putador. E um robô, trazido especialmente para a feira, 
jogará uma partida de xadrez com o vencedor de um jo- 
go realizado numa praça pública com um tablado e com 
peças gigantes. 


MICROHOBBY 41 


ici 


Outra preocupação dos organizadores desta feira, foi 
com a melhor forma de locomoção do público dentro 
do Anhembi. Para isto, os stands foram distribuídos por 
área, mostrando os produtos nacionais e estrangeiros la- 
do a lado. Para a orientação do público, foram pintadas, 
no chão, setas coloridas indicando o circuito a ser per- 
corrido. 


O Congresso 


O XVI Congresso Nacional de Informática tem uma 
tradição que remonta dos tempos difíceis de ano de 
1967 que, na época, foi chamado de Congresso Nacional 
de Processamento de Dados e que reuniu pouco mais de 
500 pessoas. 

Hoje em dia o Congresso tem o objetivo de colocar as 
técnicas automatizadas não só aos técnicos, como tam- 
bém ao grande público. 

Os seminários e debates do Congresso, contarão com 
a presença de expositores de renome internacional como 
por exemplo Ralph Gomory falando sobre a Evolução 
da Tecnologia dos Computadores; John Maccarthy abor- 
dando o tema “Inteligência Artificial” e Y.F. Lum falan- 
do sobre Videotexto, além de outros. Os temas versarão 
sobre diversos assuntos, tentando sempre atingir a todos 
os interesses. No dia 17, haverá a abertura, com seção 
solene e o congresso se estenderá até o dia 23 as 17 
horas. 

O Congresso estará distribuído no Anhembi, desde o 
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Linguagem de máquina. 


Jacarei: Pça. Conde de Frontin, 76 - S.J. Campos: R. XV 
de Novembro, 9 e Calçadão, 383 — Taubaté: Bispo 
Rodovalho, &0 e Calçadão, 64, 


plenário, ampliando-se aos auditórios E, G,J, na sala A, 
B, He L; iniciando-se as palestras, debates e cursos téc- 
nicos às 8 horas e encerrando-se às 17 horas. 

O intuito real dos organizadores de tamanho evento é 
transmitir a todos os frequentadores, a imagem de que a 
convivência entre o homem e o computador pode ser pa- 
cífica e recheada de trocas de informações úteis ao de- 
senvolvimento da humanidade. Tanto é que, na feira, ha- 
verá uma exposição de “artes plásticas”, reunindo pai- 
néis, pinturas, gráficos e desenhos de vários autores fei- 
tos por computadores em todo o país. 

Diante de tudo isto onde estará a nossa revista? 

Nosso stand será especial; numa esquina localizada na 
rua M, número 7 no formato de uma banca de jornal, 
com computadores TK funcionando durante todos os 
sete dias da feira. 


À 
ma 
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| STAND 7 
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Contando com pessoal de atendimento 
treinado nas próprias fábricas, o Depto. de 
Microcomputador da Allcolor está a sua 
disposição para falar-lhe fluentemente tudo 
sobre CP2R00, CPS00, CP500, TK82, TK83 ou 
TK85. Falar-lhe das características 
específicas de cada hardware, dos 
equipamentos e configurações apropriados 
para cada uso, dos vários softs aplicativos ou 
jogos e, principalmente, falar-lhe das 
facilidades que a Allcolor, através do 
financiamento direto ou consórcio, oferece 
para você adquirir o seu microcomputador. 
Fale com o pessoal da Allcolor, ele vai falar a 
sua linguagem. 


ARTIGOS | PROTEÇÃO JURÍDICA 
AN DO PROGRAMA DE UM COMPUTADOR 


12 parte 


A questão da protegibilidade, ou não, do programa de compu- 
tador eletrônico, através de normas jurídicas adaptadas ou pró- 
prias, não é muito novo. Em 1964, o Copyright Office, que é o 
órgão da Biblioteca do Congresso Norte-americano encarregado 
do desempenho de todas as funções e obrigações administrativas 
decorrentes da legislação sobre o direito autoral estadunidense (o 
chamado copyright), já havia decidido efetuar o registro — como 
sendo obra suscetível daquela proteção — dos programas de com- 
putador eletrônico, desde que (a) fossem o resultado de uma 
autoria pessoal (contendo, portanto, originalidade), (b) já tives- 
sem sido publicados (isto é, postos à disposição do público) e (c) 
fossem entregues (aquele órgão) cópias elaboradas de maneira 
humanente legíveis. Em 1967, o Centro de Estudos Internacionais 
da Propriedade Industrial, que é órgão da Faculdade de Direito e 
de Ciências Políticas e Econômicas de Estrasburgo, na França, 
realizou um colóquio de engenheiros de processamento de dados, 
juristas e outros cientistas, sob o tema “A PROTEÇÃO DOS RE- 
SULTADOS DA PESQUISA EM FACE DA EVOLUÇÃO DAS 
CIÊNCIAS E DAS TÉCNICAS”, quando foram examinadas ques- 
tões atinentes à Microbiologia, à Química Macrocelular, à Infor- 
mática e, em particular, aos Programas de Computadores Eletrô- 
nicos. Se bem que, naquela altura, o Parlamento Francês já dis- 
cutia o projeto de lei (promulgada em janeiro de 1968) que ex- 
cluiu da proteção pela Propriedade Industrial os programas, ne- 
gando-lhes os direitos de patentes de invenção e os de privilégios 
correspondentes, houve grande debate quanto à patenteabilidade 
dos programas, defendida por maioria. A tendência naquele coló- 
quio foi no sentido de que os programas poderiam ser protegidos 
pelo direito decorrente da concessão de patentes de invenção. Po- 
rém também houve juristas que defenderam a tese de que o pro- 
grama poderia e deveria ser protegido pelas regras do Direito 
Autoral, tendo em vista tratar-se de verdadeira obra do espírito 
humano, de natureza evidentemente intelectual, sujeita à reprodu- 
ção e execução, tal como se dá com os roteiros cinematográficos, 
ou com os projetos de engenharia (posição até hoje defendida pe- 
la maioria dos doutrinadores italianos, em razão de peculiaridade 
do seu direito autoral interno, como se verá mais adiante). Além 
do exemplo norte-americano, também as Filipinas introduziram, 
expressamente, no seu Decreto de 14 de novembro de 1972 (re- 
lativo à propriedade intelectual), os programas de computadores, 
como obras às quais ele se aplica, segundo dispõe o seu art. 2, na 
alínea “n”. 

No Brasil, JOSÉ CARLOS TINOCO SOARES parece ter sido 
o pioneiro na publicação de estudo a respeito do assunto, quando 
divulgou um artigo intitulado PROTEÇÃO DOS PROGRAMAS 
DE COMPUTADORES, através da Revista de Direito Mercantil, 
volume 17, de 1975 nas páginas 39/44. Ali, TINOCO SOARES 
defendeu a inaplicabilidade do Direito Autoral aos programas, 
assim como das regras atuais da Propriedade Industrial (patente 
de invenção, ou privilégio de modelo industrial), nada obstante 
tivesse proposto a introdução, em nosso sistema de direito positi- 
vo, de um privilégio dos programas de computadores, por um 
tempo determinado e não excedendo o máximo de cinco anos 
(ob. cit. pág. 44). 

Posteriormente, ROBERTO FRANK, CLÁUDIO DE SOUZA 
AMARAL e HENRIQUE GANDELMAN trataram do assunto em 
artigos publicados no periódico TELECOM (de 09.11.79 e 06.08. 
79, os dois primeiros, respectivamente) e no JORNAL DO 
BRASIL de 24.08.80, o último, todos defendendo, no entanto, 
a inclusão dos programas entre as obras protegidas pelo Direito 
Autoral, embora com alguma temperança. 

Em 1979, a CAPRE — Comissão de Coordenação das Ativida- 
des de Processamento Eletrônico —, extinta com a criação da 
SECRETARIA ESPECIAL DE INFORMÁTICA — SEI —, que a 
substituiu, organizou um Grupo de Trabalho sobre Mecanis- 
mos de Controle à Importação de Software, em cujo relatório 
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propôs, entre outras sugestões, que, “no Brasil, se tomem as pri- 
meiras medidas para o estabelecimento de uma estrutura legal e 
jurídica adequada, sem optar pela legislação de direito autoral ou 
pelo direito de patente, que procure preservar e estimular as em- 
presas nacionais do ramo e aumentar em quantidade e qualidade 
a oferta de empregos para os profissionais brasileiros”. 

Essa parece ser, mesmo, a tendência geral, a despeito dos Esta- 
dos Unidos da América, cuja Lei nº 96-517, de 12.12.80, alterou 
a legislação relativa aos direitos autorais, para deixar inequívoca 
sua proteção, como tal, aos programas de computadores eletrôni- 
cos, agora expressamente tratados como obras intelectuais gera- 
doras do copyright, ratificando assim, como é de costume por lá, 
a posição antes assumida pelo Copyright Office. 

A OMPI — Organização Mundial da Propriedade Intelectual —, 
entidade intergovernamental e órgão especializado da UNESCO, 
a qual tem sede em Genebra, e cujo principal papel é promover a 
proteção da propriedade intelectual (entendida esta como os di- 
reitos autorais e a propriedade industrial) por toda a Terra, além 
de administrar algumas das mais importantes convenções multi- 
laterais relativas ao Direito Intelectual —, depois de ouvir especia- 
listas de diversos países a ela filiados, criou, também, um Grupo 
Consultor de peritos governamentais, a fim de avaliar a necessida- 
de da proteção dos programas e a natureza de tal proteção. Entre 
outros motivos justificadores da oportunidade de uma proteção 
jurídica, segundo o representante da Alemanha Ocidental, foi res- 
saltado o fato de que, se não houver nenhuma proteção, os inte- 
ressados em obtê-la haveriam de adotar medidas de segredo (co- 
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mo, aliás, algumas empresas produtoras de equipamentos fazem), 
afirmando que isso não é desejável, do ponto de vista do progres- 
so dos conhecimentos técnicos. 

Depois de diversos anos de reuniões, estudos e debates, a OMPI 
aprovou e publicou um conjunto de regras que ofereceu aos 
governos dos paises filiados, para servirem de guias, modelos ou 
sugestões para a elaboração de suas próprias legislações internas 
A tais regras foi dado o título oficial de “Disposições Tipos” e 
elas consagram a introdução, no mundo jurídico-legal, de um no- 
vo e especial direito para a proteção dos programas de compu- 
tadores eletrônicos, que, também, participa da classificação dos 
Direitos Intelectuais (ou da Propriedade Intelectual, como tam- 
bém são chamados aqueles direitos). 

Além disso, a OMPI também concluiu pela oportunidade de 
propor aos governos dos países a ela filiados a aprovação de um 
tratado internacional sobre a proteção do LOGICIÁRIO (palavra 
que é por mim proposta para substituir software, seguindo Oo 
exemplo dos franceses que a trocaram por logiciel) 

De um modo geral, as disposições tipos têm a seguinte estru- 
tura (que se transcreve da revista Le Droit d'Auteur, de 1978, 
pág. 13): O artigo primeiro define o objeto da proteção (“progra- 
ma de computador”, “descrição do programa”, “documentação 
auxiliar” e “logiciário”, este último consistindo em um ou vários 
dos objetos mencionados anteriormente), assim como define o 
termo “proprietário”. O artigo 2 determina a quem pertencem os 
direitos relativos ao logiciário, particularmente quando este foi 
criado por um empregado; além disso, regulamenta a transferência 
e a reversão dos direitos relativos ao logiciário. O artigo 3 define 
a exigência de originalidade do logiciário. O artigo 4 precisa que 
as noções (por oposição à forma em que elas são expressas) ficam 
fora dos limites da proteção fixada pela lei. O artigo 5 enumera os 
atos cobertos pelos direitos do proprietário, cuja lista pode divi- 
dir-se em duas partes: os pontos | e !l tratam da divulgação não 
autorizada do logiciário e do acesso não autorizado ao logiciário, 
enquanto os pontos Ill e IV são concernentes aos atos de cópia, 
de utilização, de venda, etc, não autorizados, do logiciário. O ar- 
tigo 6 define a violação e prevê dois casos que não são considera- 
dos como violações (criação independente do logiciário e a situa- 
ção especial dos navios, dos engenhos espaciais ou engenhos de lo- 
comoção aérea ou terrestre estrangeiros que penetram o território 
de um país). O artigo 7 define a duração dos direitos conferidos 
pela lei (20 anos, contados da data da criação do logiciário). O ar- 
tigo & define as medidas judiciais disponíveis em caso de infração. 
O artigo 9 precisa que uma proteção fundada em outras disposi- 
ções (legais) não fica excluida. 

Em junho do corrente ano, a mesma OMPI preparou um texto 
de um “Esboço de Tratado para a Proteção do Logiciário” (em in- 
glês: Draft Treaty for the Protection os Computer Software), cuja 
estrutura jurídica é basicamente a mesma daquela que têm as Dis: 
posições Tipos, nas quais foram, evidentemente, calcados seus ar- 
tigos. Assim, Os seis primeiros artigos do “Esboço de Tratado” re- 
ferem-se ao direito relativo à proteção do logiciário: definição; 
princípio da proteção (ou seja, prescreve a que a proteção a ser 
conferida em cada país signitário do tratado deverá ser no míni- 
mo igual à proteção prevista no próprio tratado, o que, todavia, 
não impedirá que a proteção nacional seja ainda mais ampla que a 
do tratado); tratamento nacional (isto é, o tratado prescreve que 
aos estrangeiros, oriundos de países filiados a ele, recebam o mes- 
mo tratamento que é dado aos nacionais, desde que tenham tam- 
bém cumprido as formalidades eventualmente exigidas, seja no 
seu país de origem, seja no país em que estiver pleiteando a prote- 
ção); os atos contra os quais se aplica a proteção; a duração da 
proteção (prevista em 20 anos, no tratado, tal como nas Disposi- 
ções Tipos) e os casos especiais dos veículos que ingressem no ter- 
ritório nacional, portando programas de seus países de origem 
Os demais artigos do projeto referem-se a assuntos administrati- 
vos, como as hipóteses e modos de revisão do tratado, as maneiras 
de ser parte dele e quando entra em vigência, assim como sua de- 
núncia, etc. 

Simultaneamente, a OMPI, através do seu Comitê de Peritos 
Governamentais, prepara-se para examinar, também, a questão da 
protegibilidade dos “circuitos integrados” (também conhecidos 
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como chips), que são alvo de um desenvolvimento significativo, 
nos últimos anos, principalmente como incremento da fabricação 
de inúmeros produtos para uso diário, principalmente para co- 
mandar certos processos eletrônicos, como os das modernas má- 
quinas de lavar, dos jogos, de brinquedos, etc. A proteção dos cir- 
cuitos integrados, no entanto, ao menos segundo as regras previs- 
tas para a proteção dos programas de computadores, parece bas- 
tante incerto e algo remota. Por isso, a OMPI preferiu, a conselho 
dos peritos que integram seu Comitê Intergovernamental, antes de 
propor qualquer regulamentação protetiva, levantar todas as ques- 
tões que podem ser suscitadas a respeito, para equacioná-las e ve- 
rificar se, quando e qual proteção poderá ser sugerida e proposta. 

No Brasil, portanto, ainda não existe nenhuma norma legal ex- 
pressamente destinada a proteger os programas de computadores 
eletrônicos. A Secretaria Especial de Informática — SEI — está 
diligente e cuidadosamente elaborando um esboço de anteprojeto 
de lei, visando a estabelecer a proteção jurídica dos programas de 
computadores, o qual esta estruturado mais ou menos no molde 
das Disposições Tipos da OMPI (à qual o Brasil é filiado). Com 
muita cautela e segurança, a SEI está submetendo o seu estudo à 
análise e ao exame dos especialistas brasileiros, pedindo-lhes su- 
gestões, a fim de oferecer ao Governo um anteprojeto atual, mo- 
derno e eficaz, cujas normas possam conferir a melhor proteção 
jurídica aos programas, aos seus autores e, principalmente, pro- 
curando prevenir os interesses nacionais a respeito, que hão de es- 
tar acima dos interesses privados, tendo-se em conta que o Mundo 
será de quem detiver o maior número possível de informações e as 
puder processar eficientemente. 

Acompanhando de perto as sugestões formuladas pelo Grupo 
de Estudos organizado pela CAPRE, assim como atendendo, no 









projeto. 





Rua Aurora, 279 - São Paulo - SP 
Teis.: PABX 220-5322 e 223-8211 

Telex: (011) 30743 TLCP BR 
(011) 31113 CCTP BR 


teleart 


Rua Santa Efigência, 378/380 - SP 
Tels.: 221-2210 e 222-7322 








Rua Aurora, 174 - São Paulo - SP 
Tel.: 220-6878 


DAMEL 


REMESSA POSTAL: 
Remetemos pelo correio, mediante o 
envio de Vale Postal ou cheque visado. 

















endereços para 
você resolver seus 

problemas e iniciar 
ou completar o seu 





que lhe foi possível, as recomendações apresentadas pela “'Comis- 
são Especial nº 003/Software e Serviços" (CE-003), que a própria 
SEI constitui, nos termos da Portaria nº 003, de 20.03.80, pro- 
cura-se instituir um novo direito, especial para atender às neces- 
sidades também especiais do seu complexo objeto. Esse direito, 
no entanto, por sua natureza e em razão principalmente da natu- 
reza de seu objeto, também pertence à classificação de Direito In- 
telectual, situando-se, portanto, ao lado do Direito Autoral e do 
Direito de Propriedade Industrial, dos quais será o irmão mais no- 
vo, posto que, sem nenhuma dúvida, o programa de computador, 
bem como todo o logiciário, é uma obra intelectual, evidentemen- 
te. Assim, não se estarão aplicando, integralmente, as regras do 
Direito Autoral, como haveria de acontecer se se admitisse, defini- 
tivamente, que os programas fossem obras objeto de tais regras, as 
quais, em conjunto, são perniciosas para o interesse nacional e até 
mesmo para a própria proteção pretendida. E não se aplicarão as 
regras do Direito da Propriedade Industrial, que, aliás, estão prati- 
camente vedadas, pelo que dispõe o Código da Propriedade Indus- 
trial, cujo artigo 90, entre as “invenções não privilegiáveis”, in- 
clui, no inciso h, “os sistemas e programações, os planos ou os es- 
quemas de escrituração comercial, de cálculos, de financiamento, 
de crédito, de sorteios, de especulação ou de propaganda”. 
Contudo, enquanto “seu” lobo não vem, isto é, na falta de 
normas jurídicas especialmente aplicáveis aos programas, como 
poderão, os interessados em obter alguma proteção, defender es- 
ses mesmos interesses, principalmente quando ocorrerem atos de 
terceiros que lhes firam o que a sua consciência lhes aponta como 
“seus direitos”. O que fazer contra a pirataria, que campeia 
solta? 
(Continua no próximo número) 
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CIRC. INTEGRADOS 
SEMICONDUTORES 
TECLADOS 
CAIXAS E KITS 
CONECTORES 
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LIVROS TÉCNICOS 
FERRAMENTAS 
INSTRUMENTOS 




























Instalação de rêdes e centrais telefônicas. Completo estoque de 
materiais p/'telefones PBX e PABX. Rêdes de intertones e 
manutenção de centrais telefônicas. 
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era 
PEQUENOS 





REVISTAS IMPORTADAS -— 


FARAH'S BOOK 
SHOP — Rua Haddock Lobo, 1503 — Fone: 881-3410. 

Vendo Timex/Sinclair 1000, ZX SPECTRUM, produ- 
tos MEMOTECH (HRG, 64K, Interface para impressora, 


etc.), programas e outros periféricos. Tratar com 
TANIOS — Tel.: 270-3368. 

Serviço de Datilografia — IBM. Teses, apostilas e ma- 
nuais técnicos. Telefone: 258-8486 — Américo, SP. 

GRANDE CIRCUITO -— Boletim para usuários do 
TK. Duas mil cópias em Off-set distribuídos para todo o 
Brasil. Anúncios grátis. Informações: CP: 28, CEP: 
27200 — Piraí, RJ. 

SOFTSYSTEM — Software importado para TK 82/85, 
NEZ, CP 200, ZX 81, etc. Linguagem de máquina inédi- 
tas. Solicite catálogo para Caixa Postal 02, Poá, SP. CEP: 
08550. 

Troco ou vendo PROGRAMAS (NACIONAIS E IM- 
PORTADOS) para os micros: CP 200, TK82-Ce ZX 81. 
Possuo Simulador de Vôo, Turbo, Galaxy e muitos 
outros jogos e aplicativos. Tratar com Ecuardo Medeiros 
— R. Eliseu Guilherme, 1076 — Ribeirão Preto — SP — 
CEP: 14100 — Atendo também por reembolso. 

Vendo ou troco PROGRAMAS DE JOGOS para 
TK82-C e TK85. Tratar com Edson — Rua Guariba, 54 
— São Paulo. Tel.: 918-0998 (c/ Ruth). 

RADIO MICRO — O primeiro grupo de rádio amado- 
res digitais do Brasil convida todos os radioamadores a 
conhecerem os projetos de hard e soft que estamos de- 
senvolvendo. Aos interessados entrarem em contato com 
PYy-2-EM! Renato Strauss — R. Cardoso de Almeida, 
654/32 — 05013 — São Paulo, SP. 

Colocamos  VIDEO-REVERSO em televisores 
TX-Philips, fazemos adaptações de TV's para monitor de 
vídeo e vendemos kits de vídeo-reverso. Luiz Wellington 
— Tel.: 224-2776 — Fortaleza/CE. 
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ANUNCIOS 


Vendo programas nacionais e importados, 2K e 16K, 


BASIC e ASSEMBLER para micros TK82-C e similares 
(Aceito trocas) — Carlos A. Sciaretti — Caixa Postal 
5567 — São Paulo, SP — CEP 01051 — Tel.: 5622-8586. 


Conversor do NEZ8000 para SLOW: Em São Paulo, 


WILSON DE ASSIS faz a inclusão desta função no 
NEZ8000 por Cr$ 20.000,00 (mais as despesas de em- 
balagem e correio) e dá a garantia de 6 meses. Se o seu 
endereço for próximo ao dele, ele entregará em casa. 
O seu telefone é: (011) 203-7967 e o endereço: Rua 
Fabricio Correia, 145, Tucuruvi, 02311 — São Paulo — 
SP. 


Vendo esquema completo do microcomputador 


NEZ8000 (com SLOW e expansão de memória) — 3 có- 
pias heliográficas. Cheque nominal de Cr$ 6.000,00 pa- 
ra JAN MARTIN LUND, Rua Frederico Ozanã, 16/21 — 
11100 — Santos — SP. 


Vendo ou troco programas de jogos para TK82-C e 


TK85. Tratar com Edson, R. Guariba, 54 — São Paulo — 
Tel.: 918-0998 (c/ Ruth). 


Curso de Linguagem de máquina para TK82 e TK85 


(ASSEMBLY Z80). Aos sábados das 9:00 às 13:00 hs. 
— São Paulo — Fone: 813-4555 (Márcia) à tarde. 

Troca de programas para TK — Carlos Horácio C. 
Fontenelle — R. Alfeu Aboim, 770 — Aldeota — Forta- 
leza — CE — CEP: 60000. 


Sou possuidor de muitos programas para o TK82. Os 


interessados em trocá-los escrevam para Marco Aurélio 
Dias de Oliveira — Av. Afonso Pena, 1557 — Bloco B — 
apto. 214 — Campo Grande/MS — CEP: 79100. 


ESPIÃO — Jogo de Aventura para TK e CP-200. Um 


desafio a sua Memória e Habilidade. 16K com SLOW. 
Cr$ 5.000,00. Pedidos pelo reembolso para Cx. Postal: 
28 — 27200 — Piraí — RJ. 





Caso o seu micro não leia bem fitas 
programadas, compre um CMSIZX 


para os computadores de lógica SINCLAIR: 
TK82, TK83, TK85, DR e E 
(— | 125 T = CP 200 e outros. EB pe | ER É Rg 


SIT 
Da Córeies E Y Do nicaSge q je - 41 - VE oéE uau asia Ão q po 
sa PREGO: 00 
















sinal emitido pelo a: 250! sinal modulado pelo 
gravador cs — CMS/ZX 
POLIMICRO Avenida Andrade Neves, 1.254 - Tel.: (0192) 8-0822 - CEP 13.100 - CAMPINAS-SP É 


[ | DESEJO CONHECER AS REVENDAS DE MINHA CIDADE 


| J EM ANEXO ESTOU ENVIANDO CHEQUE NOMINAL NO VALOR 
E CS PARA ADQUIRIR UNIDADES DO CMS/ZX 


CIDADE: 
ENDEREÇO: ESTADO: 


4 
0123456789 
nº assinatura = 
m rig ssa Publicações e Material Didático Ltda. 
i Caix | 60081 - CEP 05096 - São Paulo - SP 
CGC: 52 275.724/0001. 41 - Inscr. Est.: 110.862.362 


Desejo assinar a Revista MICROHOBBY (12 edições) 















TELEFONE 
CGC ou CPF 
INSCRIÇÃO 


ASSINATURA 





| LA 






Estou anexando a quantia de Cr$ PD SUDO URNA SR em cheque nominal 
- para MICROMEGA P.M.D. Ltda., referente.a venda de uma assinatura. [ ] vale postal 
-  emchequenominaln? — Banco 





- Data 
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A pes sato 


COMO COLABORAR 
COM MICROHOBBY 


A Revista MICROHOBBY foi criada para servir de in- 
tercâmbio entre os leitores que participam do mágico 
mundo da computação. 

A característica realmente inovadora do computador 
pessoal, está em transformar cada consumidor num cria- 
dor. Aproveite sua criatividade e envie suas colaborações 
recebendo remuneração a título de DIREITO AUTO- 
RAL. 


A maneira ideal de nos enviar o material a ser publica- 
do obedece às seguintes normas: 


1. Nunca esqueça de colocar o nome completo, telefone, 
endereço e número de sua assinatura em todo material 
enviada a nós, sejam listagens de impressora, fitas, enve- 
lope, carta ou qualquer outro material. 

2. Envie a listagem de programa datilografada ou, me- 
lhor ainda, tirada na impressora do computador. 

3. Coloque sempre uma linha REM com o nome do 
autor e o título do programa. 

4. Envie uma fita com o programa gravado algumas ve- 
zes (se possível em gravadores diferentes). 

5. Na fita, gravar com microfone (em viva voz), algumas 





ASSINATURA 


A nossa revista não é distribuída nas bancas. Para 
obter seu exemplar mensal, contendo muitos programas 
para o seu TK, além de muitas dicas e prêmios interes- 
santíssimos, você deve fazer uma assinatura de Micro- 
Hobby num preço anual de Cr$ 11.800,00. 

Para tanto, você deverá preencher corretamente o 
cupom anexo, colocá-lo num envelope, junto a um che- 
que nominal ou vale postal a favor de MICROMEGA 
PUBLICAÇÕES E MATERIAL DIDÁTICO LTDA,, no 
valor de Cr$ 11.800,00 ( até 30/10). 
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instruções úteis: 
nome completo e endereço do remetente. 

6. Quando o programa for adaptado e/ou traduzido de 
outra revista, citar a fonte (autor original, data de publi- 
cação, nome da revista e todos os detalhes que houver 
referente à publicação). 

7. Anexar ao material, uma carta autorizando a publica- 
ção por parte da revista e assumindo a responsabilidade 
pela autoria do material e/ou adaptações. Nesta carta, 
para agilizar a remuneração, podem constar os dados da 
conta corrente onde daremos o depósito correspondente 
aos direitos autorais. 

8. O material não utilizado não será devolvido, ficando 
a critério da redação a decisão final sobre sua publi- 
cação. 

9. O material deve ser enviado para: 


MICROMEGA PUBLICAÇÕES E MATE- 
RIAL DIDÁTICO 

SEÇÃO PROGRAMAS DO LEITOR 

RUA BAHIA, 1049 

01244 — SÃO PAULO, SP. O 


Qualquer reclamação deve ser feita por carta anexando, se possível, 
uma etiqueta de endereçamento, para que o atendimento seja o mais 
rápido possível. 


O envelope deverá ser selado e endereçado à: 


MICROMEGA P.M.D. LTDA. 
DEPTO. DE ASSINATURAS 


Caixa Postal 60081 — CEP 05096 
São Paulo — SP 





No verso do cheque escreva: 


“Destina-se ao pagamento de uma assinatura 


(12 números) da revista MICROHOBBY”. 





Quando este cheque for devolvido ao seu Banco com 
nosso endôsso, servirá de comprovante provisório até 
que nosso recibo seja enviado pelo correio. 

6) 





TIG-LOADER possibilita: TIG-SCREEN: vinte e sete rotinas de RR e 

e à localização do ótimo volume do gravador, facilitando a programas! Inversão de v deo, moldura, arquivo de imaç ens pel 
operação LOAD. quatro direções, etc... efeitos visuais incríveis! Em linguagem de má 

* DUPLICAR qualquer programa, mesmo aqueles ocupa 1,3Kb, ficando protegido no RAMTOP, depois é só utilizá-lo onde quiz 
“fechados”. a Ra | 

e carregar (LOAD) e DUPLICAR simultaneamente. Ra CG UIVIF: coloque, em seus programas em BASIC, a veloc 

* gravar (SAVE) em 2 gravadores ao mesmo tempo. . et cad do ad Ra CRC RARIO é dante e 

* monitorar as operações LOAD, SAVE ou DUPLICAÇÃO Pronto! Você terá o seu programa em linguagem de máquina em 
através de fone. PIIGK. Com manual explicativo. | 

e filtrar as interferências elétricas de baixa frequência, que TIO ; 


Pala r a E 
CDEEM rs midias SED id A j sétima 
Eae FP É =) Dm ume E) mb nacão je soft a jardware j 
ESET RE E ER) IÇARA ar > 


são a causa da maioria dos problemas de LOAD/SAVE. transferên 
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me ” : senta a A BM “ a Dm Ff 
os microicassete de 4 200 sauas 'OCcê po 
AI E CARAI Vai . o 

DR md PA ES - Us ed] E . ta 1! T 
gravar 168Kb em 5 segundos! Acrescenta ao micro a funcãc 

A | 2 + é | A , : db dntd 
p= 7 e a 7 N 
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Envie seu pedido + cheque cruzado. Atendemos somente por carta. 
Prazo de entrega: 15 dias. Solicite relação de programas em fita. 
Despesas postais incluídas nos preços. 


SIM, desejo receber o TIG-LOADER, para tanto, estou anexando o cheque nº nO valor de Cr$ 
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